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

Разработать схему алгоритма для вычисления суммы ряда:S=1/2+1/3+1/4....1/N.Число N вводится с клавиатуры. Протестировать алгоритм для N=1, N=2, N=4, N=6. Правильность ответов проверить с помощью калькулятора.

  1. Ответ
    Ответ дан HRAshton
    var N, i: integer;
        S: real;
    Begin
         writeln('N = ');
         readln(N);
         for i := 2 to N do
         begin
              S := S + 1 / i;
         end;
         writeln('> ', S);
    end.

    Тогда так)
Самые новые вопросы