Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, оканчивающееся на 8. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, оканчивающееся на 8. количество чисел не превышает 1000. введённые числа не превышают 30 000. программа должна вывести одно число – максимальное число, оканчивающееся на 8.
OtvettePlz
2
19.06.2019 05:20
8
Другие вопросы по теме Информатика
Katrun15
29.10.2021 18:22
vasilyukandrey
29.10.2021 18:09
polinakomarova3
26.11.2020 12:04
babikahenjudzao
30.03.2022 17:07
Mimimishkaaaa
30.03.2022 17:08
CoralineGilmor
30.03.2022 18:26
Дeнис0309
19.05.2020 07:23
Aleusand
19.05.2020 07:23
Киса11111112
19.05.2020 07:23
Популярные вопросы
- Есть ли у слов: ( шорох, мрак, темнота, оттепель) множественное число. если...
2 - Выберите верное высказывание. , 1. чем более редка вещь, тем выше цена на нее...
2 - Имена существительные, обозначить их род. пришла лютая зима. затрещал мороз....
1 - Сант..метр,10 гра(м, мм)ов, форт..чка, трен..ровка,мел..дичный, к..рмушка, ду..ло,...
2 - Чему равен объём прямоугольного параллелепипеда,если площадь его основания равна...
1 - Вычисли. выполни проверку. 29÷7 130÷60 85÷9 4÷3 19÷2 52÷5 46÷5 135÷40 680÷80...
3 - Среднее арифметическое 4-х чисел равно 71. к данной группе чисел добавили число...
2 - Распределите эти слова по группам вставьте пропущенные буквы. сколько групп...
3 - Какое количество вещества содержится в 44 граммах серной кислоты (h2so4)...
2 - Оля, вера, таня и лена собирали грибы. оля нашла грибов столько же, сколько...
1
a:array[1..1000] of integer;
i,q,n:integer;
begin
q:=0;
writeln('Кол-во чисел');
readln(n);
for i:=1 to n do
begin
writeln('Введите число №',i);
readln(a[i]);
if a[i] mod 10 = 8 then
if a[i]>q then
q:=a[i];
end;
writeln(q);
end.