Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, оканчивающееся на 8.
Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 8. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число – максимальное число, оканчивающееся на 8.

Каким изначально должно быть q?

q=0

vara:array[1..1000] of integer;i,q,n:integer;beginq:=0;writeln('Кол-во чисел');readln(n);for i:=1 to n dobeginwriteln('Введите число №',i);readln(a[i]);if a[i] mod 10 = 8 thenif a[i]>q thenq:=a[i];end;writeln(q);end.