Задать вопрос Регистрация
Помочь другим



  • Вычислите частичную сумму ряда S=1+1/2+1/4+1/8+..... вычисления прекратите,когда модуль очередного слагаемого станет меньше 0,001

Ответы 1

  • // PascalABC.NET 3.3, сборка 1634 от 14.02.2018// Внимание! Если программа не работает, обновите версию!begin  var (s,d):=(1.0,1.0);  repeat    d/=2.0; s+=d  until d<0.001;  Writeln(s:0:4)end.Результат1.9990

    • Автор:

      smokey94
    • 5 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years