Data commit

Task/Pascals-triangle/Liberty-BASIC/pascals-triangle.basic

@@ -0,0 +1,19 @@
+input "How much rows would you like? "; n
+dim a$(n)
+
+for i=  0 to n
+       c = 1
+       o$ =""
+       for k =0 to i
+             o$ =o$ ; c; " "
+             c =c *(i-k)/(k+1)
+       next k
+       a$(i)=o$
+next i
+
+maxLen = len(a$(n))
+for i=  0 to n
+    print space$((maxLen-len(a$(i)))/2);a$(i)
+next i
+
+end