profile

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

P=(1+1/1)(1+1/2)...(1+1/N)
составить программу вычисления. на языке паскаль.

  1. Ответ
    Ответ дан NiGhtWolFs
    var p:real;
    n,i:integer;
    begin
    readln (n);
    p:=1;
    for i:=1 to n do
    p:=p*(1+(1/i));
    writeln (p);
    end.

Войдите или зарегистрируйтесь, чтобы добавить ответ или свой вопрос на сайт


Другие вопросы