90б! дано n целых чисел.вывести наибольшее четное.если четных нет, вывести слово no. во входном потоке в первой строке задано целое число n - количество элементов числовой последовательности (0 < n < 100). во второй строке через пробел перечислены значения элементов целочисленной последовательности. значения элементов по модулю не превышают 30000. в выходной поток вывести единственное целое число или слово 'no'.
vladdancer
2
29.09.2019 10:10
0
Другие вопросы по теме Информатика
violettasergeevna
23.09.2019 00:40
cheacher
13.06.2019 07:40
Dasha200820
16.09.2019 15:30
teodormax
07.02.2022 16:20
katja060606
07.02.2022 16:12
020807
07.02.2022 16:09
Onalbaeva00
07.02.2022 16:04
masha0301
07.02.2022 15:54
voinabeskonechnosti
07.02.2022 15:47
Популярные вопросы
- Ребята ОЧЕНЬ 19.a||b,угол1 =5 • угол2. Найти градусную меру угла 523.a||b,угол1...
2 - Линейное уравнение с одной переменной, содержащее переменную под знаком модуля....
1 - 10. Биссектриса МA треугольника МРК делит сторону РК на от- резки так, что...
1 - Как сказать лучше - «ты выходила в без двадцати пять» или «ты выходила без...
1 - Подготовить доклад на тему Отечественное музыкальное кино ....
2 - Какие нужны условия для прорастания плесневого гриба мукор...
2 - В турнире каждый игрок сыграл ровно одну партию с каждым из других игроков....
3 - Перечислите 3 особенности великого переселения народов...
1 - 1) Чем еще известен С.С. Уваров кроме теории официальной народности. 2)Приведите...
3 - Найдите область значений функции у=х^2 , если 4≤х≤9...
1
var n,a,max,i:integer;
begin
readln(n);
max:=-30001;
for i:=1 to n do
begin
read(a);
if (a mod 2=0)and(a>max) then max:=a;
end;
if max<>-30001 then writeln(max)
else writeln('No');
end.
Пример:
5
12 65 74 87 64
74