Question

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

Answer 1

CLS
INPUT a
m=0
FOR I=1 TO a
INPUT b
IF (b mod 10=8) AND b>m THEN m=b
END IF
NEXT
PRINT m
END