Запросить массив из 5 элементов и определить кол-во отрицательных элементов. (Как надо написать в Pascal)

Скопируй отсюда: pastebin.com/Jcj54XVK

Спасибо.

Слушай, я тут проверил эту программу на Pascal и почему то мне пишут, что "Параметр цикла for в PascalABC.NET. должен описываться в заголовке цикла". Может где то надо ещё что-то написать или это я чего-то не поинмаю?

понимаю*

Запишите вот так for var i:=1 to 5 do

var n:array [1..5] of integer;

var c: integer; 

begin

for i:=1 to 5 do

     if n[i]<0 then c:=c+1;

end.