Даны действительное число а, натуральное число n. Вычислить значение выражения - QBasic

Узнай цену своей работы

Формулировка задачи:

Добрый вечер. Нужна помощь в решении задачи 78(в) из задачника по программированию Абрамова. "Даны действительное число а, натуральное число n. Вычислить: 1/a + 1/(a*(a+1)) + 1/(a*(a+1)*(a+2)) +...+ 1/(a*(a+1)*...*(a+n))" На первый взгляд мне показалась задача очень простой:
Листинг программы
  1. REM Example
  2. INPUT a
  3. INPUT n
  4. s = 0
  5. k = 1 / a
  6. FOR i = 1 TO n
  7. s = s + k / (a + n)
  8. NEXT i
  9. PRINT s
Считает неправильно(ошибка в 7 строке), т.к. уже 3й элемент вводится неправильно. Прощу помощи в исправлении моего алгоритма или написании нового.

Решение задачи: «Даны действительное число а, натуральное число n. Вычислить значение выражения»

textual
Листинг программы
  1. INPUT a
  2. INPUT n
  3. s = 0
  4. k = 1
  5. FOR i = 0 TO n
  6.     k = k / (a + i)
  7.     s = s + k
  8. NEXT
  9. PRINT s

Объяснение кода листинга программы

  1. Входные данные: — Действительное число а — Натуральное число n
  2. Создание переменных: — s = 0 (счетчик суммы) — k = 1 (переменная для хранения результата деления)
  3. Используя цикл FOR, выполняем следующие действия: — Делим k на (a + i) (где i - это номер итерации от 0 до n) — Добавляем полученное значение к переменной s
  4. Завершаем цикл NEXT
  5. Выводим значение переменной s с помощью команды PRINT

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

11   голосов , оценка 4 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут