Сначала спрашивайте у пользователя число n, потом заполняйте массив (с проверкой на [-100..100]), потом в цикле проверяйте каждый элемент массива на кратность 5. Параллельно с проверкой на кратность (в том же цикле) кидайте первое кратное число в переменную max, и сравнивайте с это переменной другие числа, кратные 5. Если больше - перезаписываете значение max
Цикл: (counter - счетчик, n - колво чисел в массиве)
max := 0; for counter = 1 To n Do if (Massive[counter] mod 5) = 0 then if Massive[counter] > max then max := Massive[counter];
Насколько я помню,операторы div и mod - операторы деления.mod - возвращает остаток от деления,а div - наоборот,целую часть.Алгоритм прост в данном случае: Пусть число abcd - заданное пользователем число.Тогда первая цифра будет равна : a = abcd div 1000 //a - число тысяч Вторая : b = (abcd - (a*1000)) div 100 //b - число сотен Третья : c = (abcd - (a*1000 + b*100)) div 10 // c - число десятков Четвертая : d = abcd mod 10 // d - остаток от деления,в данном случае число единиц. Остается только вывести a,b,c и d через пробел на экран.
Цикл: (counter - счетчик, n - колво чисел в массиве)
max := 0;
for counter = 1 To n Do
if (Massive[counter] mod 5) = 0 then
if Massive[counter] > max then max := Massive[counter];
В конце выводите max
Пусть число abcd - заданное пользователем число.Тогда первая цифра будет равна : a = abcd div 1000 //a - число тысяч
Вторая : b = (abcd - (a*1000)) div 100 //b - число сотен
Третья : c = (abcd - (a*1000 + b*100)) div 10 // c - число десятков
Четвертая : d = abcd mod 10 // d - остаток от деления,в данном случае число единиц.
Остается только вывести a,b,c и d через пробел на экран.