В какой строчке допущена ошибка в программе, написанной на языке PascalABC. Программа должна высчитывать произведение элементов целочисленного массива.
1) program summa;
2) var a: Array [1..10] of integer;
3) i, p: integer;
4) begin
5) writeln ('Введите 10 чисел');
6) for i:=1 to 10 do
7) readln (a[i]);
8) p:=1;
9) for i=1 to 10 do
10) p:=p * a[i];
11) writeln ('Произведение элементов массива=',p);
12) end.
А)2 Б)7 В)8 Г)9