Втаблице dat хранятся данные о количестве учеников в классах (dat[1] — количество учеников в первом классе, dat[2] — во втором и т. определите, какое число будет напечатано в результате работы следующей программы. текст программы на трёх языках программирования. алгоритмический язык алг нач целтаб dat[1: 11] цел к, m 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 нц для к от 1 до 11 если dat[к] > 22 то m : = m+1 все кц вывод m кон бейсик dim dat(11) as integer dim k,m as integer 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 if dat(k) > 22 then m =m+1 endif next k print m паскаль var k, m: integer; dat: 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] > 22 then begin m : = m+1; end; writeln(m); end.
ответ: 7
Объяснение:
Данная программа проверяет значения ячеек массива от Dat[1] до Dat[11], если значение больше 22, тогда к переменной m прибавляется 1.
Изначально m = 0
Dat[1] := 20; > 22 нет, переходим к следующему шагу.
Dat[2] := 25; > 22 да, к m прибавляем 1, m = 0 + 1 = 1
Dat[3] := 19; > 22 нет, переходим к следующему шагу.
Dat[4] := 25; > 22 да, к m прибавляем 1, m = 1 + 1 = 2
Dat[5] := 26; > 22 да, к m прибавляем 1, m = 2 + 1 = 3
Dat[6] := 22; > 22 нет, переходим к следующему шагу.
Dat[7] := 24; > 22 да, к m прибавляем 1, m = 3 + 1 = 4
Dat[8] := 28; > 22 да, к m прибавляем 1, m = 4 + 1 = 5
Dat[9] := 26; > 22 да, к m прибавляем 1, m = 5 + 1 = 6
Dat[10] := 21; > 22 нет, переходим к следующему шагу.
Dat[11] := 27; > 22 да, к m прибавляем 1, m = 6 + 1 = 7
Строка writeln(m); означает, что программа должна вывести на экран значение переменной m
Значит в результате работы программы будет напечатано: 7