Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Loler57ùö
26.04.2023 18:19 •
Информатика
Паскаль. составьте программу, выводящую на экран все трехзначные числа, сумма цифр которых равна 10
Показать ответ
Ответ:
LollyOgry
13.08.2020 20:52
Var
i:integer;
Begin
for i:= 100 to 999 do
if ((i mod 10)+(i div 10 mod 10)+(i div 100)) = 10 then write(i,' ');
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Hhdhcnxh475366
24.01.2020 14:09
За время каникул саша сделал 96фотоснимков .он отснял на двух цветных плёнках по 30 снимков на каждой и одну целую чёрно – белую плёнку.сколько черно – белых снимков сделал саша?...
MilaniaDelli
24.01.2020 14:09
1.каким ключом нельзя отвернуть гайку? 2.какую ноту не кладут в суп? 3.из каких ноготков нельзя собрать букет? 4.в каких лесах нельзя заблудиться? 5.из какого крана нельзя брать...
57788
24.01.2020 14:09
Домбыра қандай шығармаларды орындауға арналған? ответить на вопрос...
sonya19970
24.01.2020 14:09
Основные положения клеточной теории,ее значения . если можно то кратко...
killmepleaseeee
24.01.2020 14:09
Коробке лежат 6 красных и 8 белых шаров.какова вероятность того что выбранный наугад шар окажется. 1 красным ,2 желтым...
Марина1000001
24.01.2020 14:09
Вкниге 80 страниц. маша прочитала три четвертых книг.1)сколько прочитала маша.2)какую часть книги ей осталось прочитать 3)во сколько раз число страниц прочитаных машей больше...
zuza81ozzhmr
24.01.2020 14:09
Очем рассказ толстого ,,лучше 1) о детях 2) о природе 3) о родине 4) о животных 5) о волшебстве и приключениях...
arinka200000
24.01.2020 14:09
Начерти один отрезок длиной 8см а другой на 4см больше вырази длину второго отрезка в дециметрах и сантиметрах. что делать там же написано начертить что чертить и как...
Melisaoz07
24.01.2020 14:09
Зоопарку доставили корм для животных: контейнер овощей и 11 ящиков фруктов . масса овощей в контейнере 54кг , а масса фруктов в каждом ящике в 6 раз меньше .сколько килограммов...
nif4
24.01.2020 14:09
Найдите отношение p: t, если 10/13 от p равны 5/8 от t...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i:integer;
Begin
for i:= 100 to 999 do
if ((i mod 10)+(i div 10 mod 10)+(i div 100)) = 10 then write(i,' ');
End.