Var a array 1 n of integer. Readln в Паскале. A:array[1.n