Написать программу, которая по последней цифре числа позволяет определить последнюю цифру его квадрата.

Question

Информатика

Асюша

5 июня, 22:19

Написать программу, которая по последней цифре числа позволяет определить последнюю цифру его квадрата.

+5

Ответы (1)

Знаете ответ на вопрос?

Даная · Answer 1

Var a, b: longint;

begin

write ('введите число - > ') ;

readln (a) ;

a:=a mod 10;

b: = (a*a) mod 10;

writeln ('последняя цифра квадрата числа - > ', b) ;

end.