' Fibonacci numbers using square root of 5 s = 16108001 T = s Mod 100 fi = (1 + Sqr(5)) / 2 psi = (1 - Sqr(5)) / 2 Fibonacci = (fi ^ T - psi ^ T) / (fi - psi) MsgBox Fibonacci