Question

Задать одномерный массив Х, который содержит 14 элементов. Вычислить произведение D=K*L Где К-положительные элементы, а L-отрицательные.

Answer 1

Если в паскале то:
X: array[1..14] of integer/string/real/ и т.д.

var D, K, L : integer;
begin
d:=K*L
end.

Answer 2

Не верно. Так вы посчитаете произведение всех элементов.