В одномерном массиве A(10) найти наибольший элемент из отрицательных напишите пожалуйста

Begin
var a:=ArrRandom(10,-10,10).Println;
writeln(a.Where(x->x<0).Max);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.