Определите, какое число будет напечатано в результате работы следующей программы. Var t, m: integer; Lose: array[1..10] of integer; Begin Lose[1] := 1; Lose[2] := 5; Lose[3] := 3; Lose[4] := 6; Lose[5] := 7; Lose[6] := 12; Lose[7] := 1; Lose[8] := 3; Lose[9] := 3; Lose[10] := 1; m := 0; For t := 1 to 10 Do If Lose[t] > 3 Then Begin m := m + Lose[t]; End; Writeln(m); End.

Задание

Определите, какое число будет напечатано в результате работы следующей программы.
Var t, m: integer;
Lose: array

\[1\.\.10\]

of integer;
Begin
Lose

\[1\]

:= 1; Lose

\[2\]

:= 5;
Lose

\[3\]

:= 3; Lose

\[4\]

:= 6;
Lose

\[5\]

:= 7; Lose

\[6\]

:= 12;
Lose

\[7\]

:= 1; Lose

\[8\]

:= 3;
Lose

\[9\]

:= 3; Lose

\[10\]

:= 1;
m := 0;
For t := 1 to 10 Do
If Lose

\[t\]

> 3 Then Begin
m := m + Lose

\[t\]

;
End;
Writeln\(m\);
End.