В данной версии паскаля можно написать так:
1.
const n=10;
var i,S,x:integer;
a:array[1..n] of integer;
...
Т.е. n должна быть константой, а не переменной (в программе в этом случае n вводить нельзя).
2.
var n,i,S,x:integer;
a:array[1..100] of integer;
...
Вместо n написать какое-то большое число, а в программе ввести n <= этого числа.