Предмет: Информатика,
автор: natashasharova
Найдите двузначное число, обладающее тем свойством, что куб суммы его цифр равен квадрату самого числа.(pascal)
Ответы
Автор ответа:
0
uses crt;
var i,s,a,b:integer;
begin
for i:=10 to 99 do
begin
a:=i div 10;
b:=i mod 10;
s:=a+b;
if s*s*s = sqr(i) then writeln(i);
end;
readln;
end.
Похожие вопросы
Предмет: Українська література,
автор: prastaya
Предмет: Литература,
автор: nazarchernov03
Предмет: Окружающий мир,
автор: ouistion
Предмет: Математика,
автор: apr27526
Предмет: Алгебра,
автор: Жека76