Meelash
6 год назад
Дано цело число c. напишите программу которая возводит в квадрат остаток от целочисленного деления числа c на 10 и выводит на экран монитора результат.даю 12 баллов!!!!!!!!!!!
ОТВЕТЫ
Laag
Jul 6, 2019
Var
c:integer;
begin
Write(c=); Read(c);
Writeln(sqr(c mod 10))
end.
Пример
c=1346
36
c:integer;
begin
Write(c=); Read(c);
Writeln(sqr(c mod 10))
end.
Пример
c=1346
36
162
