Написать программу, котоя выдаст k-ое число из ряда Фибоначии - VB
Формулировка задачи:
Здравствуйте..
Пожалуйста, помогите написать программу, котоя выдаст k-ое число из ряда Фибоначии
-----
Кто не знает, то рад фибоначии, это когда f[n] = f[n-1] + f[n-2],,,
то есть 1 1 2 3 5 8 11 19 и т.д.
Заранее Спасибо
Решение задачи: «Написать программу, котоя выдаст k-ое число из ряда Фибоначии»
textual
Листинг программы
- Function f&(n&)
- Dim i&, a&
- a = 1
- For i = 1 To n
- a = f + a
- f = a - f
- Next
- End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
