Дан целочисленный массив из 27 элементов. элементы массива могут принимать целочисленные значение значения от -20 до 20 – сведения о температуре за каждый день ноября. опишите алгоритм, который находит и выводит максимальную температуру среди дней, когда были заморозки (температура опускалась ниже нуля). если таких чисел нет, нужно вывести сообщение ″таких чисел нет″. на языке паскаль.
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(27,-20,20); a.Println;
var max:=a.Where(t->t<0).DefaultIfEmpty.Max;
if max=0 then Writeln('Таких чисел нет')
else Writeln(max)
end.
Пример
6 2 14 16 -18 -18 -8 17 -9 12 8 16 4 -5 -3 11 17 -6 8 13 4 12 5 -4 -8 16 -8
-3