В таблице А хранятся данные о количестве воспитанников, опоздавших за неделю

В таблице А хранятся данные о количестве воспитанников, опоздавших за неделю (A[1] - данные за пн, A[2] - за вторник и т.д).
Обусловьте, что будет написано в результате исполненья последующего метода:
Язык Pascal (Паскаль)

var k,m,day: integer;
A:array[1...6] of integer;
Begin
A[1]:=3
A[2]:=1
A[3]:=4
A[4]:=2
A[5]:=4
A[6]:=2
day:=1;
m:=A[1]
for k:=2 to 6 do
begin
if A[k]gt;=m then
begin
m:=A[k];
day:=k;
end;
end;
write(day);
end.


___________________________
Напишите с обьяснением, пожалуйста ;)