Помогите решить на PASCAL ABC!Только он!
В Массиве A(n) найти минимальный элемент среди нечетных отрицательных.
// PascalABC.NET 3.0, сборка 1128
begin
var n:=ReadInteger(n=);
var a:=ArrRandom(n,-50,50).Println(,);
Writeln(Минимальное отрицательное нечетное равно ,
a.Where(x->(x<0) and Odd(x)).Min)
end.
Тестовое решение:
n= 15
-44,-27,40,6,-43,-19,-37,-8,-31,0,16,41,34,-26,17
Минимальное отрицательное нечетное равно -43
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
