Числовые последовательности

Тема в разделе "Delphi - FAQ", создана пользователем -, 10 мар 2008.

Статус темы:
Закрыта.
  1. Гость

    Люди, помогите с задачей, очень надо.

    Вычислить:
    P=(1-1/2)*(1-1/4)*(1-1/6)*...*(1-1/2n);

    Заранее спасибо :(
     
  2. Black horse

    Black horse Гость

    Код (Text):
    program I_idiot;
    var
    p : real;
    i, n : integer;
    begin
    Readln(n);
    p:=1;
    For i:=1 to n do
    p:=p * (1 - 1 / (2 * n));
    Writeln(p)
    end.
     
  3. Гость

    Люди, я конечно понимаю, что задаю глупые вопросы, но я только учусь и у меня прблемы с заданием циклов. Так что пожалуйста подскажите с циклом в программе
    S=1!+2!+3!+...n!;

    и дайте ссылку на нормальный учебник. СПАСИБО!!!!!!
     
Загрузка...
Похожие Темы - Числовые последовательности
  1. 203
    Ответов:
    12
    Просмотров:
    2.449
  2. 203
    Ответов:
    2
    Просмотров:
    2.169
  3. burito
    Ответов:
    1
    Просмотров:
    1.225
  4. tolyanl1985
    Ответов:
    9
    Просмотров:
    2.358
  5. tolyanl1985
    Ответов:
    1
    Просмотров:
    1.817
Статус темы:
Закрыта.

Поделиться этой страницей