Скажите пожалуйста,что не так с программой на языке Паскаль(пишет,что ожидался идентификатор,но FOR обнаружено

Программа про массив из 15 элементов, который должен вывести на экран 3 значения
PROGRAM PR1;
VAR a1,a2,a3,N:INTEGER;
t:array [1..15] of real;
BEGIN
writelN('ВВЕДИТЕ')
FOR N:=1 TO 15 DO
READLN(T[N]);
writeln('ПОКАЗАТЬ');
readln(a1,a2,a3);
writeln(t[a1],',',t[a2],',',t[a3]);
END.