2,749
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
Joan1980 2004-11-05
- 打赏
- 举报
谢谢apple—8180的解答
十豆三 2004-11-05
- 打赏
- 举报
CLEAR
I=0.0005
P=8848
J=0
DO WHILE I<P
I=I*2
J=J+1
ENDDO
?"对折"+ALLTRIM(STR(J))+"次后超过8848M"
*结果为：对折25次后超过8848M
I=0.0005
P=8848
J=0
DO WHILE I<P
I=I*2
J=J+1
ENDDO
?"对折"+ALLTRIM(STR(J))+"次后超过8848M"
*结果为：对折25次后超过8848M
atsiang 2004-11-05
- 打赏
- 举报
USE 表名
DO WHILE RECC()<=100
INSERT BLANK
ENDD
DO WHILE RECC()<=100
INSERT BLANK
ENDD
Joan1980 2004-11-05
- 打赏
- 举报
小丑,你人真好,初来咋到的我有人理也是一件开心的事,上面那题目你看不懂吗?
十豆三 2004-11-04
- 打赏
- 举报
USE 表名
FOR I=RECCOUNT()+1 TO 100
APPEND BLANK &&或insert blank 或 Insert Into...
ENDFOR
FOR I=RECCOUNT()+1 TO 100
APPEND BLANK &&或insert blank 或 Insert Into...
ENDFOR
边城无名 2004-11-04
- 打赏
- 举报
楼上的答案真确!
LAIYANGPJ 2004-11-04
- 打赏
- 举报
25
LAIYANGPJ 2004-11-04
- 打赏
- 举报
???????????
Joan1980 2004-11-04
- 打赏
- 举报
还有很多问题要等待你们的回答哦
1.假设有一张足够大的纸,厚度为0.0005m,试编程计算,当对折多少次后,其总厚度超过珠穆朗玛峰的高度(8848m)
1.假设有一张足够大的纸,厚度为0.0005m,试编程计算,当对折多少次后,其总厚度超过珠穆朗玛峰的高度(8848m)
Joan1980 2004-11-04
- 打赏
- 举报
谢谢各位的帮助哦,作为初学者的我确实需要大家的好好帮助,谢谢
LAIYANGPJ 2004-11-03
- 打赏
- 举报
USE 表名
for i=1 to 100
append blank &&或INSERT BLANK
ENDFOR
for i=1 to 100
append blank &&或INSERT BLANK
ENDFOR
