Ответы на вопрос:
Var i,j,k: integer; begin for i: =1 to 9 do for j: =0 to 9 do for k: =0 to 9 do if i*i*i+j*j*j+k*k*k=i*100+j*10+k then writeln(i*100+j*10+k); end. результат: 153 370 371 407
Популярно: Информатика
-
Catplaykotick02.07.2022 01:53
-
mishazhidkov225.02.2022 06:44
-
liliyazaleeva1203.03.2023 11:18
-
anny6002.11.2021 10:54
-
MrQelen13.04.2020 00:01
-
elenaveruaskina16.12.2020 00:29
-
ВикаБрагина200518.03.2021 07:07
-
AngelinaMon109.10.2021 15:27
-
menoralle03.04.2020 16:28
-
куколку18.12.2020 00:40