Параграф 8 номер 4

Краткое условие: Программист написал программу для нахождения произведения элементов массива, но допустил ошибку. Program proizv; const n=10; var a: array [1..n] of integer; p, i: integer; begin p:=0; for i:=1 to n do begin readln(a[i]); p:=p*a[i] end; writeln('p=', p) end. 1) Что получится, если ввести: \( 1,-2,3 \), \( -4,5,-6,7,-8,9,-10 \) ? 2) Придумайте массив, который даст правильный результат. 3) Найдите ошибку.