0 / 0 / 0
Регистрация: 04.12.2013
Сообщений: 36
1

Описать функцию вычисляющую числа Фибоначчи

08.12.2013, 20:26. Показов 2670. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Описать функцию Fib(N) целого типа,вычислающий N-й элемент последовательности чисел Фибоначчи F(k), которая описывается следующими формулами: F1=1, F2=1, F(k)=F(k-2)+F(k-1), K=3,4... .
Использую функцию Fib, найти 5 чисел Фибоначчи с данными номерами N1,N2,...N5.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.12.2013, 20:26
Ответы с готовыми решениями:

Описать рекурсивную функцию Fact(N) вещественного типа, вычисляющую значение факториала
Описать рекурсивную функцию Fact(N) вещественного типа, вычисляющую значение факториала N! =...

Описать нерекурсивную функцию, вычисляющую N-e число Фибоначчи
Описать нерекурсивную функцию Fib(N) целого типа , вычисляющую N-e число Фибоначчи F(N) по формуле:...

Описать нерекурсивную функцию целого типа, вычисляющую N-e число Фибоначчи по формуле
Описать нерекурсивную функцию Fib(N) целого типа , вычисляющую N-e число Фибоначчи F(N) по...

Описать рекурсивную функцию FibRec(N) целого типа, вычисляющую N-е число Фибоначчи
Описать рекурсивную функцию FibRec(N) целого типа, вычисляющую N-е число Фибоначчи F(N) по формуле:...

6
0 / 0 / 0
Регистрация: 04.12.2013
Сообщений: 36
08.12.2013, 22:20  [ТС] 3
если я попросила помочь написать программу (т.е.мне нужна готовая программа),
значит мне некогда искать?
не находите логику?
0
11487 / 3774 / 678
Регистрация: 13.02.2009
Сообщений: 11,153
09.12.2013, 00:54 4
Честно говоря я не увидел ни здрасте-пжалста-помогите ни вопроса
Я увидел только опубликованное задание без комментариев!
Не находите логику?
0
Заблокирован
09.12.2013, 08:22 5
Лучший ответ Сообщение было отмечено The trick как решение

Решение

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Private Sub Form_Load()
AutoRedraw = True
Liss_Ксюша
End Sub
 
Sub Liss_Ксюша()
For l& = 1 To 5
  Debug.Print l, Fib(l) 'Ctrl+G - в Immediate
  Print l, Fib(l) 'На форму
Next l
End Sub
 
Function Fib&(n&)
    Dim i&, a&
    a = 1
    For i = 1 To n
        a = Fib + a
        Fib = a - Fib
    Next
End Function
2
Модератор
Эксперт функциональных языков программированияЭксперт Python
35609 / 19504 / 4077
Регистрация: 12.02.2012
Сообщений: 32,544
Записей в блоге: 13
09.12.2013, 10:57 6
Лучший ответ Сообщение было отмечено The trick как решение

Решение

Мимо этой темы пройти не мог:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Function Fib(n As Integer, Optional c As Long = 1, Optional p As Long = 0) As Long
         If (n = 1) Then
            Fib = c
         Else
            Fib = Fib(n - 1, c + p, c)
         End If
End Function
 
 
Sub Test()
    For i% = 1 To 30
        Debug.Print Fib(i%)
    Next i%
End Sub
1
0 / 0 / 0
Регистрация: 04.12.2013
Сообщений: 36
09.12.2013, 20:27  [ТС] 7
Цитата Сообщение от Alex77755 Посмотреть сообщение
Честно говоря я не увидел ни здрасте-пжалста-помогите ни вопроса
Я увидел только опубликованное задание без комментариев!
Не находите логику?
здесь нельзя так писать вообще-то
простите, тема закрыта
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
09.12.2013, 20:27
Помогаю со студенческими работами здесь

Описать рекурсивную функцию Fib2(N) целого типа, вычисляющую N-й элемент последовательности чисел Фибоначчи
Recur5°. Описать рекурсивную функцию Fib2(N) целого типа, вычисляющую N-й элемент...

Описать нерекурсивную функцию Fib1(N) целого типа, вычисляющую N - й элемент последовательности чисел Фибоначчи
Описать нерекурсивную функцию Fib1(N) целого типа, вычисляющую N-й элемент последовательности...

Описать рекурсивную функцию Fib1(N) целого типа, вычисляющую N-й элемент последовательности чисел Фибоначчи.
Вариант4. Описать рекурсивную функцию Fib1(N) целого типа, вычисляющую N-й элемент...

Описать функцию F(m,n)=n!*m!/(n+m)!, где n, m - неотрицательные целые числа. (Определить внутреннюю функцию, вычисляющую факториал)
Задача: Описать функцию F(m,n)=n!*m!/(n+m)!, где n, m - неотрицательные целые числа. (Определить...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru