Дам 30 баллов
составить программу нахождения произведения значений элементов массива состоящего из 10 целых чисел. Значение элементов массива заданы с помощью формулы a[i]:= i*i-1

Ответ:

0

На PascalABC.NET:

begin

 ArrGen(10, i -> i * i - 1, 1).Product.Println;

end.

Писать программу по хорошему смысла нет. При i =1 получаем a[1] = 0 и все дальнейшие умножения от 0 не будут отличаться.