Дан целочисленный массив из 30 элементов. элементы массива могут принимать значения от -10 до 20. составьте программу, которая подсчитывает и выводит среднюю температуру по всем дням, когда были заморозки. гарантируется, что хотя бы в один день были заморозки

167

483

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

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

сехун2

Информатика

4,8(93 оценок)

//дан целочисленный массив из 30 элементов. элементы массива могут принимать значения от -10 до 20. //составьте программу, которая подсчитывает и выводит среднюю температуру по всем дням, //когда были заморозки. гарантируется, что хотя бы в один день были заморозки var i,x,y : shortint; s : real; t : array [1..30] of shortint; begin randomize; for i: =1 to 30 do begin t[i]: =random (31)-10; //заполняем таблицу случайным образом (в диапазоне от -10 до 20) writeln (i,' ',t[i]); //строка не обязательная просто позволяет увидеть заполненный массив end; for i: =1 to 30 do begin if t[i]< 0 then begin x: =x+t[i]; y: =y+1; end; end; s: =x/y; writeln ('средняя температура по дням, когда были заморозки ',s: 0: 2); end.