Даны действительное число а, натуральное число n. Вычислить значение выражения - QBasic
Формулировка задачи:
Добрый вечер. Нужна помощь в решении задачи 78(в) из задачника по программированию Абрамова.
"Даны действительное число а, натуральное число n. Вычислить:
1/a + 1/(a*(a+1)) + 1/(a*(a+1)*(a+2)) +...+ 1/(a*(a+1)*...*(a+n))"
На первый взгляд мне показалась задача очень простой:
Считает неправильно(ошибка в 7 строке), т.к. уже 3й элемент вводится неправильно.
Прощу помощи в исправлении моего алгоритма или написании нового.
Листинг программы
- REM Example
- INPUT a
- INPUT n
- s = 0
- k = 1 / a
- FOR i = 1 TO n
- s = s + k / (a + n)
- NEXT i
- PRINT s
Решение задачи: «Даны действительное число а, натуральное число n. Вычислить значение выражения»
textual
Листинг программы
- INPUT a
- INPUT n
- s = 0
- k = 1
- FOR i = 0 TO n
- k = k / (a + i)
- s = s + k
- NEXT
- PRINT s
Объяснение кода листинга программы
- Входные данные: — Действительное число а — Натуральное число n
- Создание переменных: — s = 0 (счетчик суммы) — k = 1 (переменная для хранения результата деления)
- Используя цикл FOR, выполняем следующие действия: — Делим k на (a + i) (где i - это номер итерации от 0 до n) — Добавляем полученное значение к переменной s
- Завершаем цикл NEXT
- Выводим значение переменной s с помощью команды PRINT
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д