Во номер 4: Даны описания:
Type Ora = 0..23;
Grade = -40..40;
Temperatura = array [Ora] of Grade;
Var t : Temperatura;
Компоненты переменной t представляют собой значения температуры, измеряемой каждый час в течение 24 часов. Напишите программу, которая:
- вычисляет среднюю температуру;
- определяет количество дней с температурой ниже нуля