是不是来编个程序来实你写的那些数啊

当然是用程序编了

上个程序这样编对不对呀
n=1
for i=1 to 5
for j=1 to 6-i
print n;
n=n+1
next j,i
end

李盼,你的程序好象对,你在QB里执行一遍不就行了吗?

我不想试呀费时
在这上面多好玩

哈哈哈：
      小菜一碟！
      dim a(i,j)
      for i= 1 to 5
      for j= 5 to 1 step -1
      read a(i,j)
      next j,i
      for i= 1 to 5
      for j=5 to 1
      print a(i,j)
      next j,i
      data 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15
      end
                                                     阿里爸爸