- 1、本文档共17页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第6讲第8章课件
一、学习目的与要求:学会编写简单的循环程序
二、重点:循环
三、难点:循环条件
四、教学工具:投影仪、计算机
五、教学方法:讲授、演示
六、教学内容:;四、循环结构 ;【格式2】DO WHILE 条件表达式
语句序列1
[LOOP]
语句序列2
[EXIT]
语句序列3
ENDDO ;【例1】编程求1+2+3+……+100之和。
SET TALK OFF
CLEAR
S=0
I=1
DO WHILE I=100
S=S+I
I=I+1
ENDDO
? ”1+2+3+……+100=”,S
SET TALK ON
RETURN ;【例2】逐条显示在STUDENT数据库的STUD表中性别为“男”的所有记录。
SET TALK OFF
CLEAR
OPEN DATABASE STUDENT
USE STUD
DO WHILE .NOT. EOF()
IF 性别=”男”
DISPLAY
ENDIF
SKIP
ENDDO
CLOSE DATABASE
SET TALK ON
RETURN ;【例3】编程显示STUDENT数据库的STUD表中除“李宁”以外的所有记录。
SET TALK OFF
CLEAR
OPEN DATABASE STUDENT
USE STUD
DO WHILE .NOT. EOF()
IF 姓名=”李宁”
SKIP
LOOP
ENDIF
DISPLAY
SKIP
ENDDO
CLOSE DATABASE
SET TALK ON
RETURN; 2.FOR循环语句
【格式】
FOR 循环变量=初值 TO 终值 [STEP步长]
语句序列1
? [LOOP]
? 语句序列2
? [EXIT]
? 语句序列3
ENDFOR/NEXT
FOR语句的执行流程如右图所示。 ;使用FOR循环语句的有关说明:
① 省略STEP 步长,则〈步长〉为默认值1;
②〈初值〉、〈终值〉和〈步长〉都可以是数值表达式,但这些表达式仅在循环语句开始执行时计算一次。循环语句执行过程中,初值、终值和步长是不会改变的,并由此确定循环的次数;
③ 可以在循环体内改变循环变量的值,但会改变循环执行次数;
④ EXIT和LOOP命令可以出现在循环体内。执行LOOP命令时,结束本次循环,循环变量增加一个步长值,返回FOR循环头判断循环条件是否成立。执行EXIT命令时,程序跳出循环,执行循环尾后面的语句 。 ;【例4】从键盘输入10个数,编程找出其中的最大值和最小值。
SET TALK OFF
CLEAR
INPUT “请从键盘输入一个数:” TO A
STORE A TO MAX, MIN
FOR I=2 TO 10
INPUT “请从键盘输入一个数:” TO A
IF MAXA
MAX=A
ENDIF
IF MINA
MIN=A
ENDIF
ENDFOR
? “最大值为:” , MAX
? “最小值为:” , MIN
SET TALK ON
RETURN ;【例5】编程判断一个数是否素数
SET TALK OFF
CLEAR
INPUT 请输入一个数: TO x
FOR i=2 TO x-1
IF Mod(x,i)=0
EXIT
ENDIF
ENDF
IF i=x
?STR(X)+“是素数”
ELSE
?STR(X)+不是素数
ENDIF 程序N-S流程图
;【例6】从键盘输入任意的10个数,按从大到小的顺序依次输出
您可能关注的文档
- 数据库性能优化12-15课件.ppt
- 数学问题解决教学设计课件.ppt
- 第5章 测量误差课件.ppt
- 数据库技术培训课程讲义课件.ppt
- 数据仓库实施方法论课件.ppt
- 数学建模综合评价课件.ppt
- 数据库文献检索课件.ppt
- 第5章 脉冲编码调制 2-2课件.ppt
- 数字图像处理实例集锦课件.ppt
- 数据库系统概论(第4版)第五章课件.ppt
- 第18讲 第17课 西晋的短暂统一和北方各族的内迁.docx
- 第15讲 第14课 沟通中外文明的“丝绸之路”.docx
- 第13课时 中东 欧洲西部.doc
- 第17讲 第16 课三国鼎立.docx
- 第17讲 第16课 三国鼎立 带解析.docx
- 2024_2025年新教材高中历史课时检测9近代西方的法律与教化含解析新人教版选择性必修1.doc
- 2024_2025学年高二数学下学期期末备考试卷文含解析.docx
- 山西版2024高考政治一轮复习第二单元生产劳动与经营第5课时企业与劳动者教案.docx
- 第16讲 第15课 两汉的科技和文化 带解析.docx
- 第13课 宋元时期的科技与中外交通.docx
最近下载
- 机械制造基础-全套PPT课件.pptx
- 地域建筑的分析__--__纳西族传统民居的现代启示.pdf
- 湖北省武汉市2023-2024学年六年级上学期语文期中试卷(含答案).pdf VIP
- 露天非煤矿山企业重大事古隐患认定目录及企业待检资料清单.doc
- 网络工程师职业规划4篇.pdf VIP
- 四年级音乐上册 牧童ppt课件1 人教新课标版.ppt
- 浙教版(2023)信息科技三上第2课感知智能生活教案.pdf VIP
- 中央空调节能运行管理.ppt
- 河北省石家庄市第四十一中学教育集团2023-2024学年七年级上学期期中历史试题(1).docx
- 《什么是冬天》儿童绘本故事演讲ppt课件(图文).ppt
文档评论(0)