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

  • Составить программу для вычисления суммы S=1/2+1/2^2 +...+1/2^(10.)

Ответы 1

  • Извиняюсь.

    Var i,n:integer; s: real; Begin Writeln('Число слагаемых - '); readln(n); for i:=1 to n do s:=s+1/i; writeln('s = ',s); End.

     

    • Автор:

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

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

Еще вопросы

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

Войти через Google

 или

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

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

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