Информация о средней суточной температуре воздуха за месяц задана в виде массива. Определите, температура скольких дней была выше среднемесячной. Напишите программу в Кумире

С учетом замечания в комментарии: "простите там НИЖЕ среднемесячной" алг Температура нач цел n,i,k вывод "Количество дней в месяце: " ввод n цел таб t[1:n] вещ ТСред ТСред:=0 вывод "Вводите ежедневную температуру",нс нц для i от 1 до n ввод t[i]; ТСред:=ТСред+t[i] кц k:=0; ТСред:=ТСред/n; нц для i от 1 до n если t[i]<ТСред то k:=k+1 все кц вывод "Количество дней с температурой больше среднемесячной: ",k,нс кон