Задание

В таб­ли­це Dat хра­нят­ся дан­ные о ко­ли­че­стве дет­ских праздников, ко­то­рые про­во­ди­ло кафе за по­след­ний год \(Dat⟨0⟩ — ко­ли­че­ство дет­ских празд­ни­ков в январе, Dat⟨1⟩ — ко­ли­че­ство празд­ни­ков в фев­ра­ле и т\. д\.\). Что будет на­пе­ча­та­но в ре­зуль­та­те вы­пол­не­ния сле­ду­ю­ще­го алгоритма

Var k, m, d: integer;
Dat: array

\[1\.\.12\]
of integer;
Begin
Dat
\[1\]
:= 2; Dat
\[2\]
:= 8;
Dat
\[3\]
:= 6; Dat
\[4\]
:= 3;
Dat
\[5\]
:= 8; Dat
\[6\]
:= 2;
Dat
\[7\]
:= 3; Dat
\[8\]
:= 7;
Dat
\[9\]
:= 8; Dat
\[10\]
:= 3;
Dat
\[11\]
:= 8; Dat
\[12\]
:= 7;
m := Dat
\[1\]
;
d := 1;
for k := 8 to 12 do
if Dat
\[k\]
> m then
begin
m := Dat
\[k\]
;
d := k;
end;
writeln\(d\);
End.