Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, оканчивающееся на 3. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, оканчивающееся на 3. количество чисел не превышает 1000. введённые числа не превышают 30 000. программа должна вывести одно число – максимальное число, оканчивающееся на 3. пример работы программы: входные данные выходные данные 3 23 13 23 3
natalya00786
3
22.05.2019 06:30
52
Другие вопросы по теме Информатика
elvinsasylbaeva
09.08.2019 04:30
amrah555
09.08.2019 04:30
Zahardenicuk
11.05.2020 22:15
Yalcun
11.05.2020 22:17
azim20071
11.05.2020 22:16
Horvatskiy
23.09.2019 20:11
Sasha808621
25.07.2019 23:40
gogolevap1
19.11.2020 13:14
dubrovin13051
19.11.2020 13:14
Популярные вопросы
- Вставьте пропущенные буквы. Выделите корни. 1. Пол_жить, предл_ жишь,...
2 - Номер 1 разложить многочлен на множетели по образцу Образец (x²-100=x²-10=(x-10)(x+10)...
2 - Яблучний сік розлили в 4 трилітрові банки й у 5 дволітрові банки.Скільки...
3 - Вычисли. Кто в группе считает быстрее всех? Найди за кономерность составления...
3 - Морфологический разбор слова носит, жира как сделать?...
3 - Найдите все целочисленные решение уравнений 20x²+21y²=2021...
1 - Постройте график функции с подробнейшим пошаговым объяснением. Очень...
3 - Вычислите значение выражения: В числителе - (2²)³×2⁵ В знаменателе -...
2 - 104. а составляет 1% от числа b. Как надо изменить число b, чтобы число...
3 - (√10+√3)(√10-√3) Упростить выражение...
2
n - кол-во чисел
i - цикловая переменная
а - число
max - максимальное число, оканчивающееся на 3
Язык програмирования: Паскаль.
var
n,i,a,max: integer;
begin
readln(n);
max := -1;
for i := 1 to n do
begin
readln(a);
if (a mod 10 = 3) and (a > max) then
max := a;
end;
writeln(max)
end.