Решите ! в таблице dat хранятся данные о количестве учеников в классах (dat[1] – количество учеников в первом классе, dat[2] – во втором и т. определите, какое число будет напечатано в результате работы следующей программы. var k, m: integer; dat: array[1..11] of integer; begin dat[1] : = 20; dat[2] : = 25; dat[3] : = 19; dat[4] : = 25; 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 : = m + 1 end; writeln(m) end.
Здесь с цикла считаем, сколько чисел меньше 25.
Dat[1] := 20; // 1
Dat[2] := 25;
Dat[3] := 19; // 2
Dat[4] := 25;
Dat[5] := 26;
Dat[6] := 22; // 3
Dat[7] := 24; // 4
Dat[8] := 28;
Dat[9] := 26;
Dat[10] := 21; // 5
Dat[11] := 27;
ответ: 5