В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] — количество учеников в первом классе, Dat[2] — во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.


Var k, m: integer;
Dat: array[1..11] of integer;
Begin
Dat[1] := 21; Dat[2] := 26;
Dat[3] := 19; Dat[4] := 28;
Dat[5] := 27; Dat[6] := 21;
Dat[7] := 24; Dat[8] := 28;
Dat[9] := 26; Dat[10] := 23;
Dat[11] := 27;
m := 0;
for k := 1 to 11 do
if Dat[k] < 25 then
begin
m := Dat[k]
end;
writeln(m)
End.
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Answers & Comments


Copyright © 2024 SCHOLAR.TIPS - All rights reserved.