Рассмотрим вариант решения задания из учебника Босова, Аквилянов 9 класс, Просвещение: 3.82. В таблице Dat хранятся данные измерений средне-суточной температуры за неделю в градусах (Dat[1] — данные за понедельник, Dat[2] — данные за вторник и т. д.). Определите, что будет выведено в результате работы следующей программы, записанной на алгоритмическом языке. Запишите эту же программу на языке Паскаль. В результате работы программы будет выведено количество элементов массива больших 14: m = 3 program Z_82; const Dat: array [1..7] of integer = (12, 14, 13, 15, 15, 12, 16); var i, m: integer; begin m := 0; for k := 1 to 7 do if Dat[k] > 14 then m := m + 1; writeln(' m=', m) end.
