Дан массив K(N), N=12. Вычислите произведение значений элементов массива.
Var a:integer; for i:=1 to n do a:=a*k (i); next i;