Бонифаций
7 год назад
Задано двузначное число. Составьте программу на языке Паскаль, с помощью которой определите, произведение квадратов цифр этого числа
ОТВЕТЫ
Трифон
Jul 20, 2019
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger(n=);
Writeln(sqr(n mod 10)*sqr(n div 10))
end.
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger(n=);
Writeln(sqr(n mod 10)*sqr(n div 10))
end.
280
Смежные вопросы:
