Задано двузначное число. составьте программу на языке - вопрос №6553537 от vd89084999583 11.02.2020 05:44

Question

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

vd89084999583 · Answer

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

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