- 1、本文档共21页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
If布尔表达式then子语句
PASCAL程序设计 学会计算机的语言 一个完整的程序 程序首部; 说明部分; 执行部分. 基本语句 输入 赋值 输出 请写出相应的语句——lx1 1.输入两个数分别放入A1,A2两个变量中; 2.输入三个数分别放入A,B,C三个变量中,并输入一个回车; 3.输入一个回车; 请写出相应的语句——lx3 最简单的构造语句 判断 请编写程序 输入两个数,找出最大数。 输入三个数,找出最大数。 输入四个数,找出最大数。 嵌套的if语句(构造语句) If 布尔表达式 then 子语句; If 布尔表达式 then 子语句1 else 子语句2; Pascal程序语言——语句(五) case语句 循环算法的要素 对于一个需要用循环解决的问题,有两个要素: 循环内容(要重复做什么)(语句) 循环条件(要重复到什么时候)(条件P) For语句 格式1: For 循环控制变量:=初值 to 终值 do 格式2: For 循环控制变量:=初值 downto 终值 do 编写程序 1.猴子吃枣子 猴子摘了一堆枣,第一天吃了一半,还嫌不过瘾,又吃了一个;第二天吃了剩下的一半零一个;以后每天如此。到第十天,猴子一看只剩下一个枣子了,问最初有多少个枣子? 循环结构 根据条件的成立与否选择是否重复某些步骤执行。 While循环 While 条件 do 循环体 如果循环体中有多条语句,要用begin和end. 当条件满足时,执行循环体. 直到型循环语句 Repeat 循环体 Until 条件 循环体中有两条语句. 每执行一次循环体,I的值加1,并检查是否超过终值,如超过,停止循环,执行下面的语句,否则,继续。 练习: 计算1+2+3+4+……+50之和。 求1*2*3*...*n (n=5) 求1+3+5+...+99 求12+22+32+…+1002 编程求1+1/2+1/3+...+1/100 趣味题(lucky52.pas) 猜价格:中央电视台的“幸运52”栏目深受观众喜爱,其中的“猜商品价格”的节目更是脍炙人口,现在请你编一个程序模拟这一游戏:由计算机随机产生100以内的一个整数,作为某件商品的价格,然后由你去猜是多少,若你猜的数大了,则计算机输出提示“Gao”,若你猜的数小了,则计算机输出提示“Di”,然后你根据提示继续猜,直到你猜对了,计算机会提示“Ok”,并统计你猜的总次数。(1)请画出流程图,(2)根据流程图写出相应程序。 * * * ——语句篇 Program mianji(input,output); Var chang,kuan,mj:integer; Begin readln(chang,kuan); mj:=chang*kuan; writeln(mj); End. 语句是执行部分的内容!也就是向计算机下达的指令。 Read(变量表); Readln(变量表); Readln; 变量:=表达式; Write(输出项表); Writeln(输出项表); Writeln; 名称 基本格式 作用及执行特点 从键盘输入数据; 从键盘输入数据,输入一个回车; 输入一个回车; 把表达式的结果放入变量中; 在屏幕上输出所有输出项目; 在屏幕上输出所有输出项目并输出回车; 在屏幕上输出回车; Read(a1,a2); Readln(a,b,c); Readln; Read(a1),(a2); Read(a1a2); Write(x.y); Write(x+y+3); Writeln(‘+’); Writeln; 1.在屏幕上输出x,y的值; 2.输出X+Y+3的结果;3.输出A的值并输出一个回车; 4.输出一个‘+’号并输出一个回车; 5.输出一个回车; Write(xy); Write(x+y+3) Writeln(+); Write; If 布尔表达式 then 子语句; If 布尔表达式 then 子语句1 else 子语句2; 名称 基本格式 作用及执行特点 根据布尔表达式的值来选择子语句是否执行。 根据布尔表达式的值来选择执行哪一条子语句。 If 布尔表达式 then 子语句; If 布尔表达式 then 子语句1 else 子语句2; 两两比较 主要程序段 Readln(a,b); write(n); If ab then n:=a else n:=b; begin t f ab 输入a,b end 输出n N?a; N?b; begin t f Bmax 输入a,b end 输出max Max:=a; max?b
您可能关注的文档
- FireworksMX制作网页图形.ppt
- Figure8-4.Flickr是一个编辑器.ppt
- FX2系列的基本指令2.ppt
- GBT××××—××××1GBT××××—××××前言本标准由中国石油和.doc
- GNOME系统桌面的使用和设置-Read.ppt
- 兒童安全與急救交通安全與戶外安全.ppt
- G12财会班夕会公开课课件+G12财会班+蒋晶.ppt.ppt
- GPS+GPRS技术方案-汇通博鼎.doc
- 全国地域特色农产品普查备案名单-xj.doc
- GY系列测温仪说明书-钢水测温仪.doc
- 剧本杀行业报告:内容创作规范与剧本市场拓展策略.docx
- 剧本杀行业区域市场区域文化特色与市场潜力分析报告.docx
- 剧本杀行业区域市场拓展实战案例研究.docx
- 剧本杀行业区域市场拓展路径与模式探索报告.docx
- 剧本杀行业区域市场竞争态势与品牌差异化策略研究报告.docx
- 剧本杀行业2025年西北区域市场市场细分领域竞争态势与品牌竞争策略分析研究报告.docx
- 剧本杀行业2025年西北市场拓展前景预测报告.docx
- 剧本杀行业2025年长沙市场发展潜力分析报告.docx
- 剧本杀行业2025年长三角市场竞争策略与布局分析.docx
- 医疗行业数据合规:2025年数据安全法实施后的合规监管挑战与应对.docx
文档评论(0)