По информатике: информация о температуре воздуха за месяц задана в виде массива. определить сколько раз температура опускалась ниже 0 градусов.

279

314

Посмотреть ответы 2

Ответы на вопрос:

Frolinng

Информатика

4,7(6 оценок)

Const n = 30; var t: array[1..n] of integer; i,k: integer; begin write('температура в течение месяца: '); k: =0; for i: = 1 to n do begin t[i]: =random(20)-15; write(' ',t[i]); if t[i] < 0 then k: =k+1; end; writeln; writeln('количество дней, когда температура опускалась ниже нуля: ',k); end. пример работы программы: температура в течение месяца: -3 -5 -4 1 -11 -5 0 2 2 4 3 -6 -7 -4 -14 -11 -15 -14 -15 0 -7 -14 -13 -13 -12 -1 -3 -13 -15 -5 количество дней, когда температура опускалась ниже нуля: 23