В какой строчке допущена ошибка в программе, написанной на языке 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:= 0;
9) for i:=1 to 10 do
10) p:=p * a[i];
11) writeln(‘Произведение элементов массива=',p);
12) end.