Изберите верное утверждение: В данной программке описан массив, состоящий иза) 20

Выберите верное утверждение: В данной программке описан массив, состоящий из
а) 20 целых чисел;
б)10 вещественных чисел;
в) 10 целых чисел;
г) 20 вещественных чисел;

_______
программка :

______

Program Massiv_1a;
Var a:Array [1..20] Of Integer
i,k:Intege
Begin
write('Введите количество элементов массива не более 20:');
Read(k);
For i:=1 To k Do
Read(a[i])
End.