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

Вычислить сумму и количество элементов последовательности 1+1/(1+2)+1/(2+3)+...+1/(n+(n+1)) с точностью до 0,002. Выполнить задачу на Pascal без применения массивов.

  1. Ответ
    Ответ дан ingr

    если я правильно помню про последовательности...

    var

       n : integer;

       s : real;

       

    begin

       while 1/(n+n+1) > 0.002 do begin

           s += 1/(n+n+1);

           n += 1;

       end;

       writeln('s = ', s);

       writeln('n = ', n);

    end.

Самые новые вопросы