Паскаль. В первой строке программы задаётся кол-во чисел, не превышающих 300. Найти максимальное число, оканчивающееся на 3.

Предыдущий
вопрос Следующий
вопрос

program MaxNumberEndingInThree;

va
n, i, maxNumber: integer;

begi
maxNumber := -1;

write('Enter the number of elements: ')
readln(n);

for i := 1 to n d
begi
write('Enter number ', i, ': ')
readln(num);

end;

if maxNumber = -1 the
writeln('There are no numbers ending with 3.'
els
writeln('The maximum number ending in 3 is: ', maxNumber);

end.