Задание
i, n: integer;
begin
Ves
Ves
Ves
Ves
Ves
Ves
Ves
n := Ves
for i := 1 to 14 do begin
if Ves
n := Ves
end;
writeln\(n\);
end.
Определите, что будет напечатано в результате выполнения следующего алгоритма.
var Ves: array
\[1\.\.14\]
of integer;i, n: integer;
begin
Ves
\[1\]
:= 25; Ves\[2\]
:= 21;Ves
\[3\]
:= 23; Ves\[4\]
:= 28;Ves
\[5\]
:= 30; Ves\[6\]
:= 25;Ves
\[7\]
:= 31; Ves\[8\]
:= 28;Ves
\[9\]
:= 25; Ves\[10\]
:= 28;Ves
\[11\]
:= 30; Ves\[12\]
:= 27;Ves
\[13\]
:= 26; Ves\[14\]
:= 24;n := Ves
\[1\]
;for i := 1 to 14 do begin
if Ves
\[i\]
< n thenn := Ves
\[i\]
;end;
writeln\(n\);
end.