Пример 3

Условие задачи:

Найти максимальный элемент последовательности, состоящей из n элементов.

Приведем фрагмент схемы:

Программа:

max = a(1)

For i = 2 To n

If a(i) > max Then max = a(i)

Next i

Переменная max принимает значение первого элемента массива а. Над всеми остальными элементами массива выполняется однотипная операция: элемент массива сравнивается с переменной max. Если встречается элемент массива больший max, то max приобретает значение этого элемента. Если условие a_i > max не выполняется, то присваивания не происходит. По окончании цикла в переменной max останется значение самого большого элемента.