Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
gashuna
02.08.2020 22:10 •
Информатика
Натуральное число называется числом армстронга, если сумма цифр числа, возведенных в n-ную степень (где n – количество цифр в числе) равна самому числу. например, 153 = 13 + 53 + 33. найдите все трёхзначные армстронга. написать в !
Ответ:
Рафаэлла2004
05.10.2020 17:47
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
0,0
(0 оценок)
Популярные вопросы: Информатика
Виолетта2209
10.04.2020 16:41
Сканируется цветное изображение размером 5,08×5,08 дюйм. разрешающая сканера — 1200×1200 dpi, глубина цвета — 32 бита. какой информационный объём будет иметь полученный графический...
sadasaдаа
20.04.2020 04:42
3. в массиве из 10 целых чисел определить, сколько значений превышает число 3. собственно сама программа const n=10; var a: array[1..n] of integer; kol,i: integer; begin kol:...
2005161718
19.02.2020 06:19
В результате выполнения программы напечатано число 15. Какое наибольшее значение может иметь переменная S после выполнения программы? Пользователь программы вводит только...
кот933
09.03.2021 18:52
Выберите неверное утверждение. Структурное программирование включает в себя безусловный переход. Для составления алгоритма решения логической задачи достаточно базовых алгоритмических...
м080878
04.01.2023 17:03
Ребят кто понимает. очень прям вообще...
Ольга1738
03.04.2020 05:30
Сколько нулей в двоичной системе в числе 72...
мартина
17.05.2021 20:05
Написать алгоритм нахождения суммы цифр трехзначного числа (использовать функции div и mod)...
Djilsi
25.07.2021 22:50
с заданием по информатике! Фото приложено ниже ....
Жанниет
21.11.2020 01:35
РЕШИТЕ МАКСИМАЛЬНО ПОДРОБНО 3 ЗАДАЧИ НА КРУГИ ЭЙЛЕРА...
Wector11211
12.06.2020 12:00
Питання №4 ? Які властивості мають спрайти в середовищі Scratch?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
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