Какую задачку выполняет программаprogram pr1; var a: array [1..5] of integer;

Какую задачку исполняет программа

program pr1;
var a: array [1..5] of integer;
max,i: integer;
begin
for i:=1 to 5 do readln(a[i]);
max:=a[1];
for i:=2 to 5 do if a[i]gt;max then max:=a[i];
writeln( max);

end.

Серега Маяимов 2019-04-24 12:10:01

Обретает максимум посреди 5 введенных чисел и выводите его