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

const N=30;
var a: array [1..N] of integer;
i, j, max: integer;
begin
for i:=1 to N do a[i]:=random(__)-__;
for i:=1 to N do write(a[i]:6);
writeln;
...
end.