Задание

В таблице Dat хранятся данные о количестве проданных единиц товаров 10 типов \(Dat⟨0⟩ — проданных товаров первого типа, Dat⟨1⟩ — второго типа и т\.д\.\). Определите, что будет напечатано в результате выполнения следующего алгоритма.
var k, m, day: integer;
Dat: array

\[1\.\.10\]
of integer;
begin
Dat
\[1\]
:=7; Dat
\[2\]
:=1;
Dat
\[3\]
:=3; Dat
\[4\]
:=3;
Dat
\[5\]
:=2; Dat
\[6\]
:=2;
Dat
\[7\]
:=5; Dat
\[8\]
:=5;
Dat
\[9\]
:=7; Dat
\[10\]
:=1;
day:=1; m:=Dat
\[1\]
;
for k:=2 to 10 do begin
if Dat
\[k\]
< m then
begin
m:=Dat
\[k\]
;
day:=k;
end;
end;
write\(day\);
end.