016565 — 编程爱好者社区

您所在位置：社区首页 — QBasic讨论区 — 016565

主题：016565

016565 [专家分：0] 发布于 2009-07-02 16:58:00

请输出这样的图形
*********
*******
  *****
   ***
    *

沙发

FFKK [专家分：1610] 发布于 2009-07-02 17:03:00

CLS
FOR I=9-4 TO 1 STEP -1
PRINT TAB(21-I);
FOR J=1 TO 2*I-1
PRINT "*'';
NEXT J
NEXT I

板凳

1054122 [专家分：750] 发布于 2009-07-02 17:14:00

CLS
FOR i = 6 TO 1 STEP -1
  PRINT SPC(6 - i);
  FOR j = 1 TO i * 2 - 1
    PRINT "*";
  NEXT j
  PRINT
NEXT i
END

3 楼

016565 [专家分：0] 发布于 2009-07-02 17:36:00

上面那位程序对的只是多输一行

4 楼

mw3943 [专家分：20] 发布于 2009-07-04 14:21:00

要熟练运用for语句可惜这么也达不到熟练郁闷

5 楼

FFKK [专家分：1610] 发布于 2009-07-17 20:17:00

上面的第一个循环i的值可以改成5

6 楼

FFKK [专家分：1610] 发布于 2009-07-19 07:32:00

就像这样
CLS
FOR I=5 TO 1 STEP -1
PRINT TAB(21-I);
FOR J=1 TO 2*I-1
PRINT "*'';
NEXT J
?
NEXT I

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