Информатика указать размер массива

На рисунке изображена программа, в которой объявляется, заполняется и выводится одномерный массив. Укажи размер этого массива.
1 program first;
2 var
3 i: integer;
4 a: array [1.171 of integer;
5 begin
6 randomize;
7 fori:= 1 to 15 do
8
a[i]:= random(100);
9 for i:= 1 to 11 do
10
writeln ('al', i, '1=', a[i])

11 end.