Информатика

Олена

2 июля, 00:19

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