В программе выходит ошибка (встречен конец файла, а ожидался оператор) подскажите, что не так?
program mas;
const n = 10;
var a: array[1..n]of integer;
i,s: integer;
begin
for i: = 1 to n do begin
a[i]: = random (100);
write (a[i]:3);
for i : = 1 to N-1 do begin
for j : = N-1 downto i do
if a [j]>A[j+1] then begin
c: = A[j];
A[j]: = A[j+1];
A[j+1]: = c;
end;