Напишите программу, которая в последовательности натуральных чисел определяет минимальное чётное число. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется чётное число. проgа нужна на языке паскаль.
151
166
Ответы на вопрос:
//pascalabc.net //версия 3.3, сборка 1634 begin write(readseqinteger(readinteger).where(x-> x.iseven).min); end.
Var count,min,this : integer; begin min: = maxint-1; read(count); for var i: = 1 to count do begin read(this); if(this mod 2 = 0) and (this< min) then min: = this; end; writeln(min); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Meryem9826.09.2022 10:15
-
Alina431502.02.2023 02:43
-
cadova05.03.2023 16:29
-
lizaroma22410.07.2022 18:12
-
Gambuker12.06.2022 17:03
-
lolipop172004.12.2021 07:20
-
babka527.11.2021 00:10
-
happyga19.02.2023 23:28
-
boda1311.02.2022 19:28
-
Lollladka105.05.2023 22:21
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.