99999999999999999
 888888888888888
  7777777777777
   66666666666
    555555555
     4444444
      33333
       222
        1
上述图形也就是一个一般的倒置三角形,但不知道提交后就变成那样的了??
我的原代码如下,但却输出的图形不对头啊!还请高手指点
 dim i%,j%
  for i=1 to 9
   print space(i);
     for j=17 to i step -2
        print trim(str(9-i+1));
     next j
   print
  next i

[[it] 本帖最后由 luojia86 于 2008-4-6 12:01 编辑 [/it]]

给你顶哈，希望早日得到答案

Dim i%, j%
  For i = 1 To 9
   Print Space(i);
     For j = 19 - i * 2 To 1 Step -1
        Print Str(10 - i);
     Next j
   Print
  Next i

收到的鲜花

• luojia86 于 2008-04-07 12:55 送鲜花  2朵   附言：我很赞同

谢谢

Dim i%, j%
For i = 9 To 1 Step -1
  Print Space((9 - i) * 2);
  For j = 17 - (9 - i) * 2 To 1 Step -1
     Print Str(i);
  Next j
  Print
Next i