Дано цело число c. напишите программу которая возводит в квадрат остаток от...

Question

Дано цело число c. напишите программу которая возводит в квадрат остаток от целочисленного деления числа c на 10 и выводит на экран монитора результат.даю 12 баллов!!!!!!!!!!!

Answer 1

Var
  c:integer;
begin
  Write('c='); Read(c);
  Writeln(sqr(c mod 10))
end.

Пример
c=1346
36

Comments

спасибо