Дано натуральное число N. Вычислить: cos1/sin1 * (cos1+cos2)/(sin1+sin2) * ... * (cos1+cos2+...cosN)/(sin1+sin2+...+ sinN). (программа Паскаль)

Uses crt;
Var n,i:integer; x,y,z:real;
Begin clrscr;
  Write('vvedite n=');
  ReadLn(n);
  x:=0;
  y:=0;
  z:=0;
  for i:=1 to n do
    Begin
      y:=y+sin(i);
      z:=z+cos(i);
      x:=x+cos(i)/(y*z);
    End;
  Write('x=',x:4:8);
  ReadLn;
End.

А)1 1/2,1 1/4, 1 1/3, 2 1/3, 8 5/6б)1 3/5, 3 1/2, 3 1/3, 3 3/4, 4 4/9 1 цифра- целая, потом дробь