MoNsTeR221
22.05.2020 08:48

Составьте программу нахождения трёхзначного числа , куб суммы цифр которого равен ему самому

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
katyamarkova22
26.05.2020 00:04

var
a,b,c,n:integer;
begin
for n:=100 to 999 do
begin
a:= n div 100;
b:= n div 10 mod 10;
c:= n mod 10;
if (a+b+c)*(a+b+c)*(a+b+c)=n then writeln(n);
end;
end.

 

и в результате получаем, что это число 512

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота