Написать программу в Паскале: В массиве из N элементов найти максимальный из...

Question

Написать программу в Паскале:
В массиве из N элементов найти максимальный из отрицательных элементов массива.

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)

begin
  Println('Максимальный=',ReadArrInteger(ReadInteger('n->')).Where(t->t<0).Max)<br>end.

Пример:
n-> 5
-7 8 -6 4 -1
Максимальный= -1 

Comments

Спасибо конечно за старания, но программу бы желательно написать в Free Pascal(чтобы были Var, Begin и так далее)

---

На будущее будете знать, что нужно ТОЧНО указывать яп