Найдите двузначное число, тем свойством, что куб суммы его цифр равен квадрату самого числа(turbo pascal)(через вложенные циклы)

Gufka965 Gufka965    2   22.05.2019 04:50    0

Ответы
anuta136 anuta136  01.10.2020 05:59

var
a, b:integer;
begin
for a:=1 to 9 do
for b:=1 to 0 do
if (a+b)*(a+b)*(a+b)=(a*10+b)*(a*10+b) then writeln(a,b);
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика