Программа на паскале

3/(1*2)*6/(2*4)*9/(3*6)*12/(4*8)*....

//PascalABC.NET 3.3,сборка 1611 от 06.01.2018//Внимание! Если программа не работает, обновите версию!beginvar x:=readinteger('x=');var (a,b,c):=(3,1,2); var y:=0.0;for var i:=1 to x do beginy:=a/b*c;a:=a+3; b:=b+1;c:=c+2;end;Writeln('y=',y);end.