Var k, m: integer; Dat: array[1..11] of integer; Begin Dat[1] := 20; Dat[2] := 27; Dat[3] := 19; Dat[4] := 28; Dat[5] := 26; Dat[6] := 22; Dat[7] := 24; Dat[8] := 28; Dat[9] := 26; Dat[10] := 21; Dat[11] := 27; m := 0; for k := 1 to 11 do if Dat[k] < 25 then begin m := Dat[k]; end; writeln(m); End. Что выведет программа?

Задание

Var k, m: integer;
Dat: array

\[1\.\.11\]

of integer;
Begin
Dat

\[1\]

:= 20; Dat

\[2\]

:= 27;
Dat

\[3\]

:= 19; Dat

\[4\]

:= 28;
Dat

\[5\]

:= 26; Dat

\[6\]

:= 22;
Dat

\[7\]

:= 24; Dat

\[8\]

:= 28;
Dat

\[9\]

:= 26; Dat

\[10\]

:= 21;
Dat

\[11\]

:= 27;
m := 0;
for k := 1 to 11 do
if Dat

\[k\]

< 25 then
begin
m := Dat

\[k\]

;
end;
writeln\(m\);
End.

Что выведет программа?