Задание:
Составить программу, позволяющую по последней цифре данного числа определить последнюю цифру квадрата этогочисла
Решение:
Uses crt; var a: integer; beginreadln (a); a: =a mod 10; a: =a*a; a: =a mod 10; writeln (a); end.
Знаете другой ответ?