В таб­ли­це Dat хра­нят­ся дан­ные о ко­ли­че­стве уче­ни­ков в клас­сах \(Dat⟨0⟩ — ко­ли­че­ство уче­ни­ков в пер­вом классе, Dat⟨1⟩ — во вто­ром и т\. д\.\). Определите, какое число будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.
Алгоритмический язык
алг
нач
целтаб Dat

цел к, m
Dat := 20
Dat := 27
Dat := 19
Dat := 28
Dat := 26
Dat := 22
Dat := 24
Dat := 28
Dat := 26
Dat := 21
Dat := 27
m := 0
нц для к от 1 до 11
если Dat < 25 то
m : = Dat
все
КЦ
вывод m
КОН
Бейсик
DIM Dat\(11\) AS INTEGER
DIM k,m AS INTEGER
Dat = 20
Dat = 27
Dat = 19
Dat = 28
Dat = 26
Dat = 22
Dat = 24
Dat = 28
Dat = 26
Dat = 21
Dat = 27
m = 0
FOR k := 1 TO 11
IF Dat\(k\) < 25 THEN
m =Dat
ENDIF
NEXT k
PRINT m
Паскаль
Var k, m: integer;
Dat: array of integer;
Begin
Dat := 20;
Dat := 27;
Dat := 19;
Dat := 28;
Dat := 26;
Dat := 22;
Dat := 24;
Dat := 28;
Dat := 26;
Dat := 21;
Dat := 27;
m := 0
for k := 1 to 11 do
if Dat < 25 then
begin
m := Dat;
end;
writeln\(m\);
End.