var

i: integer;

mul,a,b: real;

begin

sum:=1; a:=2; b:=4;

for i:=1 to 10000 do

begin

 mul:=mul*a/b;

a:=a+1;

b:=b+1;

end;

writeln('результат', mul);

end.

Дабы не делать многочисленные операции в пустую, от пользователя требуется ввод числа А, до которого будет идти итерация.(формат числа: A/B, ввод - А)

#include <iostream>

#include <iomanip>

int main()

{

int N;

float sum(1);

std::cout << "Введите число A, до которого будут идти итерации(A/B): ";

std::cin >> N;

for(float i = 2; i < N; i++)

 sum *= i/(i+2);

std::cout << "Результат = " << std::setprecision(5) << sum << std::endl;

}