Question

По заданному алгоритму составьте код программы
Помогите пожалуйста! Очень срочно!

Answer 1

var x,y,k:integer;

begin

Writeln('Привет,я-alconafft');

writeln('введите числа х');

read(x);

k:=x mod 10;

write(k);

end.