program c1;
var n:integer;
begin
readln(n);
n:=n mod 10;
writeln(n);
end.
Поделитесь своими знаниями, ответьте на вопрос:
Информатика. Написать код на Паскаль. 1)Дано натуральное число n (n<=100 Найти последнюю цифру числа n.2)Необходимо вычислить:- модуль x;- целую часть вещественного числа x;- получить случайное число в диапазоне от 0 до р, р – целое.
program c1;
var n:integer;
begin
readln(n);
n:=n mod 10;
writeln(n);
end.