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

of integer;
Begin
Dat := 7; Dat := 7;
Dat := 6; Dat := 8;
Dat := 4; Dat := 5;
Dat := 8; Dat := 7;
m := Dat;
term := 1;
for k := 2 to 8 do
if Dat > m then
begin
m := Dat;
term := k;
end;
writeln\(term\);
End.