Generate Fibonacci Series with an Algorithm in VB.NET
A Sequence of numbers in which 1 appears twice as the first two numbers, and every subsequent number is the sum of two preceding numbers: 1, 1, 2, 3, 5, 8, 13....and so on is called Fibonacci Series.
The Fibonacci Series is a sequence of numbers first created by Leonardo Fibonacci (fi-bo-na-chee) in 1202 Sequence of numbers in which 1 appears twice as the first two numbers, and every subsequent number is the sum of two preceding numbers: 1, 1, 2, 3, 5, 8, 13....and so on. As it continues, the ratio between any number and its successor approaches the ratio of golden section (1:1.618). the most spectacular examples of the Fibonacci Series in nature is in the head of the sunflower. Scientists have measured the number of spirals in the sunflower head. They found, not only one set of short spirals going clockwise from the centre, but also another set of longer spirals going anti clockwise.
The Fibonacci Series is as follows 0 , 1 , 1 , 2 , 3 , 5 , 8 , â€¦
The property of this series is that any given element in the series after the third element is the sum of its first and second predecessor. For example, consider 8. Its first and second predecessors are 5 and 3. Therefore, 5 + 3 = 8. Consider 3. Its first and second predecessors are 2 and 1. 2 + 1 = 3. The property of Fibonacci series holds.
The following is the algorithm to generate the Fibonacci series up to a given number of elements.
Algorithm : Fibonacci_Series
Input : n, the number of elements in the series
Output : fibonacci series upto the nth element
a = -1
b = 1
for(i=1 to n in steps of +1 do)
c = a + b
a = b
b = c
Private Shared Sub Main(ByVal args As String())
Dim i As Integer, j As Integer
i = -1
j = 1
Dim n As Integer
n = 20
Dim fib As Integer = 1
While fib <= n
fib = i + j
i = j
j = fib
The above article show how to get Fibonacci Series, hope you will learn and use this concept as you required.