[原创]求哪位高手解决道打印图形的题（在线等）急！！

您所在位置：社区首页 — QBasic讨论区 — [原创]求哪位高手解决道打印图形的题（在线等）急！！

主题：[原创]求哪位高手解决道打印图形的题（在线等）急！！

8855926 [专家分：0] 发布于 2007-01-29 21:24:00

*       *  中间7个空格
*     *    中间5个空格
  *   *     中间3个空格
   * *          中间1个空格
    *

沙发

gyly001 [专家分：0] 发布于 2007-02-01 19:03:00

应该不算难吧
用一个循环就可以完成了!

板凳

gyly001 [专家分：0] 发布于 2007-02-01 19:07:00

for i=1 to 4
print tab(i);"*";spc(9-2*i);"*"
next i
print tab(5);"*"
end

3 楼

黑白猪-- [专家分：420] 发布于 2007-03-26 10:55:00

CLS
INPUT N
M=N+2
FOR I=N TO 1 STEP -1
PRINT TAB(N+1-I);
PRINT "*";SPC(M);"*"
M=M-2
NEXT I
END

4 楼

小精灵LS [专家分：580] 发布于 2007-04-04 16:53:00

cls
input n
for i=n to 1 step -1
print tab(n+1-i);"*";
print cpc(i+2);"*"
next i
end

您尚未登录，请登录后再回复。点此登录或注册