- 1、本文档共3页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
实验程序文本
*ex06.prg
CLEAR
INPUT X= to X
DO CASE
CASE X1
Y=SQRT(X)+LOG10(X)
CASE x-1
Y=X^2+1
OTHE
Y=EXP(X)
ENDCASE
? Y=,Y
*ex07.prg
CLEAR
CLEAR
S=0
N=0
DO WHILE S=60000
N=N+1
S=S+N^N
ENDDO
? S=,S-N^N,N=,N-1
*ex08-1.prg
CLEAR
N=0
FOR I=1 TO 100
IF MOD(I,13)=0
N=N+1
??I
ENDIF
ENDFOR
?个数=,N
*ex08-2.prg
CLEAR
N=0
I=0
DO WHILE I=100
IF MOD(I,13)=0
N=N+1
??I
ENDIF
I=I+1
ENDDO
?个数=,N
ex09-1.prg
CLEAR
STORE 0 TO I,J,K
FOR N=1 TO 10
INPUT X= TO X
DO CASE
CASE X0
I=I+1
CASE X0
J=J+1
OTHE
K=K+1
ENDCASE
ENDFOR
?正数的个数为:,STR(I,2),负数的个数为:,STR(J,2),零的个数为:,STR(K,2)
ex09-2.prg
CLEAR
STORE 0 TO I,J,K
N=1
DO WHILE N= 10
INPUT X= TO X
DO CASE
CASE X0
I=I+1
CASE X0
J=J+1
OTHE
K=K+1
ENDCASE
N=N+1
ENDDO
?正数的个数为:,STR(I,2),负数的个数为:,STR(J,2),零的个数为:,STR(K,2)
ex10.prg
CLEAR
FOR I=1 TO 5
?SPACE(1)
FOR J=1 TO 2*I-1
?? STR(J,1)+space(1)
ENDFOR
ENDFOR
ex11-1.prg
CLEAR
FOR I=1 TO 5 输出5行
A=11-2*I 每行开始位置
N= 2*I-1 每行N个符号
X=INT(5-0.5*I) 每行输出的符号
? SPACE(A)
FOR J=1 TO N
?? STR(X,1)+SPACE(1)
NEXT J
NEXT I
Ex11-2.prg
CLEAR
CLEAR
FOR I=5 TO 1 STEP -1 输出5行
A=2*I-1 每行开始位置
N=11-2*I 每行N个符号
X=INT(2+0.5*I) 每行输出的符号
? SPACE(A)
FOR J=1 TO N
?? STR(X,1)+SPACE(1)
NEXT J
NEXT I
您可能关注的文档
最近下载
- 七年级英语中考综合练习题.doc VIP
- JBT 3837-2016 变压器类产品型号编制方法.pdf
- 《MCTC-HCB系列显示板选型手册》20160801).pdf
- 水工监测工(中级)技能鉴定理论考试题库资料(含答案).pdf
- SL-T769-2020 农田灌溉建设项目水资源论证导则SL-T769-2020.pdf
- 儿童代谢综合征临床防治指南(2025)解读.pptx
- 乡镇驻村第一书记2024年帮扶工作计划及任务清单.docx VIP
- 五年级上册数学试题-期末测试卷人教版(含答案).docx VIP
- 基于让学引思的高中政治教学探究教学研究—教育论文【课题立项】.docx VIP
- 2024初中数学竞赛真题专题训练(学生版+解析版)(共6个专题).docx
文档评论(0)