Составить программу на языке Паскаль, которая запрашивает у пользователя некоторое число (число больше 9 и меньше 30000) и выводит на экран последнюю цифру числа (цифру в самом младшем разряде числа)
program LastDigit; var num, lastDigit: integer; begin writeln('Enter a number:'); readln(num);
// Check if the number is between 10 and 29999 if (num < 10) or (num > 29999) then writeln('Number should be between 10 and 29999') else begin lastDigit := num mod 10; writeln('The last digit of the number is: ', lastDigit); end; end.
program LastDigit;
var
num, lastDigit: integer;
begin
writeln('Enter a number:');
readln(num);
// Check if the number is between 10 and 29999
if (num < 10) or (num > 29999) then
writeln('Number should be between 10 and 29999')
else
begin
lastDigit := num mod 10;
writeln('The last digit of the number is: ', lastDigit);
end;
end.