• Вопрос по информатике:

    ДАМ 98 БАЛОВ Составьте пожалуйста программу паскаль решающую следующую задачу: Дано натуральное число n. Вычислить значение произведения P=2/3*4/5*6/7*...*2n/2n+1

    • Автор:

      spookey
  • Большое вам спасибо!

    • Отвечал:

      dotscjks
    • 0
    незачто

    • Отвечал:

      raveniwbg
    • 0

    Ответ:

    uses crt;

    var n:integer;

       a,b,x:real;

    begin

    write('n=');

     readln(n);

     x:=1;

    for n:=1 to n do

      x:=x*((2*n)/(2*n+1));

    writeln(' x=',x:4:1);

    end.

    или

    uses crt;

    var n:integer;

       a,b,x:real;

    begin

    write(' n='); readln(n);

    for n:=1 to n do

    x:=2*n/2*n+1;

    writeln(' x=',x:4:1);

    end.

    Объяснение:

    • Отвечал:

      orenpw27
    • 0

    Ответов нет, но ты это испарвиш!

Еще 4 ненужных тебе вопроса, но это важно для поиска