Red de conocimiento informático - Problemas con los teléfonos móviles - Programa VB para diseñar suma de secuencia. El primer término de la secuencia es 0, el segundo término es 1 y todos los términos posteriores son la suma de los dos primeros términos. Escriba una función para encontrar el valor del enésimo elemento. es tiempo de examen

Programa VB para diseñar suma de secuencia. El primer término de la secuencia es 0, el segundo término es 1 y todos los términos posteriores son la suma de los dos primeros términos. Escriba una función para encontrar el valor del enésimo elemento. es tiempo de examen

Private Sub Command1_Click()

'El primer término de la matriz es 0, el segundo término es 1. Todos los elementos posteriores son la suma de los dos primeros términos

Dim a() Como entero

n = Val(InputBox("Ingrese el número entero N"))

ReDim a(n )

i = 3

a(1) = 0

a(2) = 1

Hacer

a(i) = a(i - 1) a(i - 2)