Sucesión de Fibonacci




En matemáticas, la sucesión de Fibonacci (a veces llamada erróneamente serie de Fibonacci) es la siguiente sucesión infinita de números naturales:

1,1,2,3,5,8,13,21,34,55,89,144,233,377,610,987,1597...

Gráfica de la sucesión de Fibonacci hasta f10

La espiral de Fibonacci: una aproximación de la espiral áurea generada dibujando arcos circulares conectando las esquinas opuestas de los cuadrados ajustados a los valores de la sucesión; adosando sucesivamente cuadrados de lado 1, 1, 2, 3, 5, 8, 13, 21 y 34.
«cada término es la suma de los dos anteriores», es la relación de recurrencia que la define.



using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace Fibonacci_3
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void button1_Click(object sender, EventArgs e)
{
if (textBox2.Text != "")
{
listBox1.Items.Clear();
//ulong nos admite enteros sin signo entre (0 a 2 elevado a 64 -1)
ulong n = Convert.ToUInt64(textBox2.Text);
ulong[] a = new ulong[n + 1];
a[1] = 1;
a[2] = 1;
for (ulong i = 3; i <= n; i++)
a[i] = a[i - 1] + a[i - 2];
for (ulong i = 1; i <= n; i++)
listBox1.Items.Add(a[i].ToString());
}
}

private void button3_Click(object sender, EventArgs e)
{
Application.Exit();
}

private void textBox2_TextChanged(object sender, EventArgs e)
{
{
string str = textBox2.Text;
int f = 0;
foreach (char c in str)
{
if (char.IsDigit(c))
f++;
else
f--;
}
if (f != str.Length)
{
MessageBox.Show("Solo números enteros y positivos !", "Error", MessageBoxButtons.OK, MessageBoxIcon.Warning);
textBox2.Clear();
textBox2.Focus();
}
}
}

private void button2_Click(object sender, EventArgs e)
{
textBox2.Clear();
listBox1.Items.Clear();
}

}
}

Free DFD 1.1 Creación y Ejecución de Algoritmos


     DFD 1.1 es un programa que permite crear diagramas de flujo, editarlos, interpretarlos y ejecutarlos. No necesita instalación, solo descargarlo y ejecutarlo. Esta en Español, Ingles y Portuges. Tiene incorporados múltiples ejemplos de funcionamiento. En You Tube encontraremos bastantes vídeos explicativos. Es muy curioso. Creo que vale la pena probarlo.
     Existen muchos enlaces de descarga. Es software libre.