Задание
Begin
Dat
Dat
Dat
Dat
Dat
m := 10;
n := 0;
for k := 1 to 10 do
if Dat
begin
m := Dat
n := k;
end;
writeln\(n\);
End.
В таблице Dat хранятся данные о количестве сделанных заданий учениками \(Dat⟨0⟩ заданий сделал первый ученик, Dat⟨1⟩ — второй и т\. д\.\). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
Var k, m, n: integer;
Dat: array
\[1\.\.10\]
of integer;Begin
Dat
\[1\]
:= 7; Dat\[2\]
:= 9;Dat
\[3\]
:= 10; Dat\[4\]
:= 5;Dat
\[5\]
:= 6; Dat\[6\]
:= 7;Dat
\[7\]
:= 9; Dat\[8\]
:= 8;Dat
\[9\]
:= 6; Dat\[10\]
:= 9;m := 10;
n := 0;
for k := 1 to 10 do
if Dat
\[k\]
< m thenbegin
m := Dat
\[k\]
;n := k;
end;
writeln\(n\);
End.