回 帖 发 新 帖 刷新版面

主题:[讨论]打印图形找不到规律,谁帮我!

*
 **
  ***
   *****
    *******
第一行1个,第二行2个,第三行3个,第四行5个,第五行7个.
有什么规律,我怎么就是看不出来规律呢,阿阿阿阿阿![em10]

回复列表 (共24个回复)

21 楼

1,2,3,5,7
不是10以内的素数吗?不过不好办
可以用个READ/DATA 来实现
FOR I=1 TO 5
  READ X
  PRINT TAB(I);
  FOR J=1 TO X
    PRINT "*";
  NEXT J
NEXT I
DATA 1,2,3,5,7

22 楼

肯定是这样做
INPUT N
FOR I=1 TO N
  PRINT TAB(10+I);
  FOR J=1 TO 2*I0-1
    ? "*";
  NEXT J
  PRINT
NEXT I
END

23 楼

CLS
FOR I=1 TO 5
PRINT TAB(I);
FOR J=1 TO 5
PRINT "*";
NEXT J
PRINT
NEXT I
END

24 楼

CLS
FOR I=1 TO 5
PRINT TAB(I);
FOR J=1 TO 5
? "*";
NEXT J
?
NEXTI I
END

我来回复

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