Вычисление произведения ряда

[Lotesse]

По заданной формуле члена последовательности с номером k составить две программы:

- программу вычисления произведения первых n членов последовательности (k = 1, 2, 3.., n);
- программу вычисления произведения членов последовательности с заданной точностью e; программа должна выводить в качестве результата вычисленную сумму (произведение) и количество членов последовательности, участвующих в суммировании (вычислении произведения)

Примечание:
а) используйте в программе вычисления суммы (произведения) членов последовательности с заданной точностью e для реализации цикла конструкцию Do ... Loop с постусловием (Do Конструкции Loop While Условие), при этом в программе вводить и использовать количество членов последовательности не нужно.
б) результаты вычислений суммы (произведения) первых n членов последовательности и суммы (произведения) членов последовательности с заданной точностью e должны быть близкими по значению.


П от k=2 до k=31 (1-4/(2k+1)^3) с точностью 0.00001

[Lotesse]

visual basic 6.0