dmFyIE4sIEksIGtvbDppbnRlZ2VyOwpiZWdpbgptYXM6IGFycmF5IFsxLi4xMDAwMF0gb2YgaW50ZWdlcjsKcmVhZCAoTik7CmtvbDo9MDsKZm9yIEk6PTEgdG8gTiBkbyBiZWdpbgpyZWFkIChtYXNbaV0pOwplbmQ7CmZvciBJOj0xIHRvIE4gZG8gYmVnaW4KaWYgbWFzW2ldJmd0OzAgdGhlbiBiZWdpbgprb2w6PSBrb2wrMTsKZW5kOwplbmQ7CmVuZC4=
var N, I, kol:integer;
begin
mas: array [1..10000] of integer;
read (N);
kol:=0;
for I:=1 to N do begin
read (mas[i]);
end;
for I:=1 to N do begin
if mas[i]>0 then begin
kol:= kol+1;
end;
end;
end.
Free Pascal Compiler version 3.0.0+dfsg-10 [2016/12/12] for x86_64
Copyright (c) 1993-2015 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling prog.pas
Fatal: Syntax error, "BEGIN" expected but "end of file" found
Fatal: Compilation aborted
Error: /usr/bin/ppcx64 returned an error exitcode