Задано три числа. Записати у змінну А найменше із цих трьох чисел, у змінну В - середнє, у змінну С - найбільше. Вивести їх на екран.
219
230
Ответы на вопрос:
Procedure search(n: integer; var mineven: integer); begin mineven : = 10; while n > 0 do begin var last : = n mod 10; if (last mod 2 = 0) and (last < mineven) then mineven : = last; n : = n div 10; end; if mineven = 10 then mineven : = -1; end;
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
dukto555507.04.2023 18:22
-
kirstav6427.01.2020 01:45
-
jaz509.12.2020 20:32
-
yalex83p0a2c723.05.2021 02:09
-
маша305326.05.2020 13:52
-
Brutal9420.08.2021 16:33
-
dofkatop00nj711.05.2021 20:07
-
ХудшийИзХудших29.09.2020 03:20
-
NikMishakov20.02.2023 21:24
-
Igor2001811.06.2020 09:56
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.