Если поиск идет в массиве, то:

1. Переменной max присваиваем значение первого элемента массива (max:=a[i]).

2. Пробегаем по массиву начиная со второго элемента (for i:=2 to 4 do).

3. Проверяем условие: если значение элемента массива больше значения переменной, то присваем переменной значение этого элемента массива (if a[i]>max then max:=a[i])

4. Вывод значения переменной.

В алгоритме не учитывалось задание этих чисел