Question

Информатика. Написать код на Паскаль. 50баллов
1)Дано натуральное число n (n<=100). Найти последнюю цифру числа n.
2)Необходимо вычислить:

- модуль x;

- целую часть вещественного числа x;

- получить случайное число в диапазоне от 0 до р, р – целое.
​

Answer 1

Ответ:

program c1;

var n:integer;

begin

readln(n);

n:=n mod 10;

writeln(n);

end.