Задано двузначное число. составьте программу на - вопрос №6554439 от iphoneX10 04.08.2022 11:37

Question

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

iphoneX10 · Answer

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

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