В какой строчке допущена ошибка в программе, написанной на языке 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.
Ошибка допущена в строке 10 программы. Начальное значение переменной p должно быть равно 1, так как умножение на 0 дает на выходе 0, и произведение всех элементов массива будет равно 0. Таким образом, строка 8 должна быть p:= 1;
Ошибка допущена в строке 10 программы. Начальное значение переменной p должно быть равно 1, так как умножение на 0 дает на выходе 0, и произведение всех элементов массива будет равно 0. Таким образом, строка 8 должна быть p:= 1;