Дано 31 число - значения температуры воздуха в марте. числа могут принимать значения от (–20) до 20. опишите на одном из языков программирования алгоритм, который подсчитывает и выводит среднюю температуру по всем дням, когда была оттепель (температура поднималась выше нуля). гарантируется, что хотя бы один день в марте была оттепель. написать программу 27 + лучший ответ
//PascalABC.NET v3.3
const n = 31;
var i,c:integer;
td:array[1..n]of real;
sr:real;
begin
for i:=1 to n do begin
readln(td[i]);
if td[i]>0 then begin
sr:=sr+td[i];
c:=c+1;
end;
end;
writeln('Средняя температура в оттепель:',sr/c)
end.