Найти ошибки в программе и заполнить пропуски (на месте ... вставить необходимые слова)

var

a: ... [1 ... 100] of integer;

N: integer; / / Количество элементов в массиве

i: real;

begin

... ('Введите количество элементов в массиве: ');

readln (N);

write ('Введите элементы массива: ');

... i:=1 to N do

read (a[i]);

write ('Вывод элементов массива: ');

for i:=1 to N do

write (a[i],' ');

var a: array [1 ... 100] of integer;

var N: integer; / / Количество элементов в массиве

var i: integer;

begin

write ('Введите количество элементов в массиве: ');

readln (N);

write ('Введите элементы массива: ');

for i:=1 to N do

read (a[i]);

write ('Вывод элементов массива: ');

for i:=1 to N do

write (a[i],' ');

Жирный выделил и ошибки и пропуски заполненные. Нужно указывать var перед определением переменой и тип данных переменой i должен быт integer так как является счетчиком