profile
Опубликовано 5 лет назад по предмету Информатика от NastasyaSin

Помогите решить в Паскале
Вычислить: у=1-1/1!+1/2!-1/3!+...1/n!.Значение n задать вводом

  1. Ответ
    Ответ дан maksview
    var
      n,i:integer;
      s:real;
    begin
      s:=1;
      readln(n);
      for i:=1 to n do
        if i mod 2 = 1 then
            s:=s-i*ln(2)
        else
            s:=s+i*ln(2);
      writeln(s);
    end.
    1. Ответ
      Ответ дан maksview
      Основная проблема выполнения задания была в поиске способа вычисления факториала дробного числа и я не уверен в найденном способе, но если он верен, то программа работает верно, если возникнут проблемы - пишите.
    2. Ответ
      Ответ дан NastasyaSin
      Она не работает)И как-то надо решиться без mod.
Самые новые вопросы