Напишите программу, которая в последовательности целых чисел определяет максимальное число. программа получает на вход целые числа, количество введенных чисел неизвестно. последовательность числа заканчивается числом 0. количество чисел не превышает 1000. введённые числа по модулю не превышает 30000. программа должна вывести одно максимальное число.
271
478
Ответы на вопрос:
Var max, n: integer; begin max : = -30000; read(n); while n < > 0 do begin if n > max then max : = n; read(n); end; write(max); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
liyaleonteva147котик05.08.2021 19:11
-
Asetkyzy25.02.2021 08:30
-
FairTail01.03.2023 20:38
-
карина564715.12.2020 21:26
-
макс310223.05.2020 10:07
-
андрейка4431.12.2022 05:21
-
бб0бб07.12.2022 20:07
-
Даринка3000017.10.2020 12:18
-
Настюша57728.03.2022 03:02
-
accacherrygdghvcg08.03.2021 06:58
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.