Есть ответ 👍

Нужно объяснить решение программы program qq; var b,c,f: integer ; begin for var a: =100 to 999 do begin b: = a mod 10; c: = (a mod 100) div 10; f: =a div 100; if a=(c*c*c)+ (b*b*b) + (f*f*f) then writeln(a); end; end.

248
379
Посмотреть ответы 2

Ответы на вопрос:


программа перебирает все 3х значные числа

b - первая цифра числа, т.е. единицы

c- вторая цифра числа, т.е. десятки

f - третья цифра числа, т.е. сотни

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

т.е. такие числа, что f*100+c*10+b=f*f*f+b*b*b+c*c*c

Loikov1
4,7(90 оценок)

Белый. ff - максимальное значение интенсивности цвета, и так указаны  все три компонента.

Популярно: Информатика