实现扬辉三角的QBASIC

最简单的思路是： 用二维数组， 每行对应上行的2项的和， 然后每行增加一项，循环即可。

还有个思路是： 递归算法， 不用数组， 直接用变量存， 空间复杂度最低

欢迎探讨kongzhu2011@sina.com

cls
for i = 0 to 9
a=1
for j = 1 to i+1
print tab(33 - i * 3 + j * 6);a;
a = a * (i - j) / j
next j
print
next i
end