Задано двузначное число. составьте программу на - вопрос №6553537 от Цоніма 21.08.2020 06:18

Question

Информатика: Задано двузначное число. составьте программу на языке паскаль, с которой определите, произведение квадратов цифр этого числа

Цоніма · Answer

// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!

begin
var n:=ReadInteger('n=');
Writeln(sqr(n mod 10)*sqr(n div 10))
end.