Помогите пожалуйста!!! Данные по температуре воздуха за декаду ноября хранятся в массивеюопределить,сколько раз температура опускалась ниже "-10" градусов.Заполнение массива осуществить с помощью клавиатуры.

Есть ответ
18.12.2022
240

Ответ


Program Pr1;uses crt;var mas:array[1..30] of integer; i,p:integer;Beginclrscr;for i:=1 to 30 do begin writeln('T za ',i,' den'); readln(mas[i]); end;p:=0;for i:=1 to 30 do if mas[i]


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.