For i: =1 to n do if a[i]> max then max: =a[i] writeln(max);в итоге выведется последнее значение, которое было присвоено переменной max.
For i: =1 to n do if a[i]> max then max: =a[i] writeln(max);в итоге выведется последнее значение, которое было присвоено переменной max.