Вкакой строчке допущена ошибка в программе, написанной на языке 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