напишите программу, которая в последовательности натуральных чисел определяет сумму трехзначных чисел кратных 6 заканчивается числом 0 ( 0 признак окончания ввода не входит в последовательность) количество чисел не привышает 1000 введенные числа не привышают 30000. программа должна вывести одно число сумму трехзначных чисел кратных 6. пример программы вводные данные 120, 9, 365, 4, 0
182
231
Ответы на вопрос:
Var a,max: integer; begin read(a); max: =0; while a< > 0 do begin if a> max then max: =a; read(a); end; write(max); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
OWERpass27.04.2023 10:17
-
reginaarslanov02.03.2021 09:19
-
кура00025.12.2021 15:11
-
popovat49601.08.2021 05:50
-
nikoszahar30.09.2020 07:51
-
grexegor21.07.2021 17:55
-
DEH11113.07.2022 21:34
-
bhawk201713.11.2022 21:03
-
Ferz68619.07.2021 13:06
-
shkiper1555522.04.2022 11:43
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.