Data update

Task/Leonardo-numbers/OxygenBasic/leonardo-numbers.basic

@@ -0,0 +1,25 @@
+uses console
+
+sub leonardo(L0 as integer, L1 as integer, suma as integer, texto as string)
+    int i, tmp
+    printl "Numeros de " texto " (" L0 "," L1 "," suma "):"
+    for i = 1 to 25
+        if i = 1 then
+            print " " L0;
+        elseif i = 2 then
+            print " " L1;
+        else
+            print " " L0 + L1 + suma;
+            tmp = L0
+            L0 = L1
+            L1 = tmp + L1 + suma
+        end if
+    next i
+    printl cr
+end sub
+
+leonardo(1,1,1,"Leonardo")
+leonardo(0,1,0,"Fibonacci")
+
+printl cr "Enter ..."
+waitkey