Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Андрей11112222
16.05.2021 02:08 •
Информатика
Вводится последовательность из n положительных целых чисел. найтинаименьшее число среди чётных элементов последовательности. n=1-100 lazarus
Показать ответ
Ответ:
paskhin2017
07.07.2020 23:55
Var n,min,a:integer;
begin
readln(n);
min:=30000;
for n:=n downto 1 do begin
read(a);
if (not odd(a)) and (a<min) then min:=a;
end;
writeln(min);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
MaksSeemo
30.09.2020 02:05
Составить алгоритм и написать программу позволяющую найти сумму элементов массива с четными номерами содержащего n элементов заполнение массива организовать натуральными числами...
nastunacka89
23.08.2020 17:33
Определите,какие из перечисленных моделей материальные,а какие информационные. укажите номера материальных моделей. 1) макет декорационного оформления театральной постановки. 2)...
erke999000
03.10.2020 07:39
Ккакому виду программного обеспечения, относятся браузеры и такого рода программы?...
ni4ego
28.12.2020 05:30
1. чему будет равняться x после выполнения фрагмента программы: x: =0; repeat x: =x+8 until x =21. 2. дано описание массива var mas: array [-22; 0] of integer; сколько элементов...
Айнұра
28.12.2020 05:30
Составьте программу которая заполняет массив а[1..10] заполните случайными целыми числами в диапазоне от 0 до 2 и выводит количество элементов,равных 1....
linmiss
18.06.2022 03:35
Первые компьютеры название сколько они имели оперативной памяти...
adiletmurataliev
23.08.2020 04:51
Составить блок-схему алгоритма определения площади кругового кольца по вводимым значениям внешнего d и внутреннего d диаметров с использованием формулы s=π(d^2-d^2)/4...
M8ilen
24.08.2022 11:53
Напишите программу для самоконтроля навыков устного счёта: пользователь вводит 6 целых чисел, после чего программа должна вывести их произведение. чтобы перемножать числа было...
HiКАK
10.04.2020 22:12
По теоретическим основам информатики ...
OniRitsu
15.05.2021 21:41
Выведите на экран все трёхзначные числа в которых хотя бы две цифры повторяются.в паскале.в программировании я полный ноль....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(n);
min:=30000;
for n:=n downto 1 do begin
read(a);
if (not odd(a)) and (a<min) then min:=a;
end;
writeln(min);
end.