Сумма n чисел Фибоначчи, начиная с заданного номера N - Pascal
Формулировка задачи:
Составить программу, определяющую сумму n чисел Фибоначчи, начиная с заданного номера N.
как?
Решение задачи: «Сумма n чисел Фибоначчи, начиная с заданного номера N»
textual
Листинг программы
function s_fib(n: longint): longint; begin s_fib := round(exp((n + 2) * ln((1 + sqrt(5)) / 2)) / sqrt(5)) - 1 end; var m, n, s: longint; begin write('n = '); readln(m); write('N = '); readln(n); s := s_fib(n + m) - s_fib(n); write('S = ', s); readln end.
Объяснение кода листинга программы
- В функции s_fib(n: longint) вычисляется сумма чисел Фибоначчи с номером n.
- Функция s_fib использует формулу для вычисления чисел Фибоначчи: s_fib := round(exp((n + 2) * ln((1 + sqrt(5)) / 2)) / sqrt(5)) - 1.
- В переменной m хранится число, а в переменной n - номер этого числа в последовательности Фибоначчи.
- После ввода чисел m и n с клавиатуры, значение переменной s вычисляется как разность суммы чисел Фибоначчи с номером n+m и суммой чисел Фибоначчи только с номером n.
- Результат вычислений, т.е. значение переменной s, выводится на экран.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д