Есть ответ 👍

Написать программу для паскаль найдите среднюю температуру для дней, когда температура поднималась выше 0 градусов, и определите количество таких дней. программа получает на входе количество дней, в течение которых проводилось наблюдение, затем для каждого дня вводится температура.

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

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

mymrina05
4,4(70 оценок)

Var   m, k, d1: single;   i, t, d: byte; begin   readln(t);   writeln();   for i : = 1 to t do   begin     readln(k);     if (k > 0) then     begin       d1 += k;       d   += 1;     end;   end;   writeln(d1 / d); end.

Допустим в январе 31 день. предположим что осадки это целые числа и число 0 свидетельствует об отсутствии осадков.вот функция возвращающая дни без осадковкод c#1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 private int[] netosadkov(ref int[]pogoda)         {             int[] error = {-1};             int[] pogodabezosadkov = { 0 };             list< int> osadki = new list< int> ();             int netosadkov = 0;                     if (pogoda.length < 31)             {                 return error;             }             for (int i = 0; i < pogoda.length; i++ )             {                 if (pogoda[i] == netosadkov)                 {                     osadki.add(i+1);                 }             }             pogodabezosadkov = osadki.toarray();             return pogodabezosadkov;         }

Популярно: Информатика