主题:[讨论]打印图形找不到规律,谁帮我!
zoa
[专家分:0] 发布于 2006-03-30 11:02:00
*
**
***
*****
*******
第一行1个,第二行2个,第三行3个,第四行5个,第五行7个.
有什么规律,我怎么就是看不出来规律呢,阿阿阿阿阿![em10]
回复列表 (共24个回复)
21 楼
JRX [专家分:180] 发布于 2006-07-04 13:51:00
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 楼
609802597 [专家分:20] 发布于 2006-08-14 20:08:00
肯定是这样做
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 楼
网络爱好者 [专家分:60] 发布于 2006-08-22 15:04:00
CLS
FOR I=1 TO 5
PRINT TAB(I);
FOR J=1 TO 5
PRINT "*";
NEXT J
PRINT
NEXT I
END
24 楼
网络爱好者 [专家分:60] 发布于 2006-08-22 15:05:00
CLS
FOR I=1 TO 5
PRINT TAB(I);
FOR J=1 TO 5
? "*";
NEXT J
?
NEXTI I
END
我来回复