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