Составить программу на языке Паскаль, которая запрашивает у пользователя некоторое число (число больше 9 и меньше 30000) и выводит на экран последнюю цифру числа (цифру в самом младшем разряде числа)
Answers & Comments
elenaklon
Var a:Integer; begin write('Введите число: '); ReadLn(a); WriteLn('Последяя цифра числа: ' , a mod 10) end.
1 votes Thanks 1
sallyhoffman
Var chislo, res: longint; Begin write('Введите число: '); read(chislo); res := chislo mod 10; writeln('Последяя цифра числа: ' , res); End.
Answers & Comments
begin
write('Введите число: ');
ReadLn(a);
WriteLn('Последяя цифра числа: ' , a mod 10)
end.
chislo, res: longint;
Begin
write('Введите число: ');
read(chislo);
res := chislo mod 10;
writeln('Последяя цифра числа: ' , res);
End.