langs a-z

2013-04-10 22:43:41 -07:00 · 2013-04-10 22:43:41 -07:00 · d066446780
commit d066446780
parent db842d013d
11389 changed files with 98361 additions and 1020 deletions
--- a/Task/Fibonacci-sequence/Visual-Basic-.NET/fibonacci-sequence-2.visual
+++ b/Task/Fibonacci-sequence/Visual-Basic-.NET/fibonacci-sequence-2.visual
@ -0,0 +1,4 @@
+Function Seq(ByVal Term As Integer)
+        If Term < 2 Then Return Term
+        Return Seq(Term - 1) + Seq(Term - 2)
+End Function