Написать программу паскаль. Вычислите произведение P=1/2*2/3*3/4...10/11 (результат...

Question

Написать программу паскаль.
Вычислите произведение P=1/2*2/3*3/4...10/11 (результат записать с точностью до 8 знаков после запятой)

Answer 1

Var
   P:real;
   A:integer;
Begin
P:=1;
For A:= 1 to 10 do
    P:=P*A/(A+1);
Write('P = ',P:0:88);
End.

Результат работы программы:

P = 0.09090909

Answer 2

begin
  Writeln(1/11:0:8)
end.

Результат
0.09090909