- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
输入两个数,将其中最大数输出 (1)输入两个数,分别存入变量a,b中 (2)比较a 与 b,将大数存入变量max中 (3)输出max If (ab) then max:=a else max:=b; Program e5(input,output) 逻辑运算 And(与)、 or(或)、not(非) If (53) and (46) then 语句(两个条件都成立) If (53) or (46) then 语句()(只要一个条件成立就可以了) If not( 46) then 语句(条件不成立的时候) 输入一个年号,求是否是闰年 条件:年号能被4整除,但不能被100整除 program ru (input,output); var year:integer; begin readln(year); if (year mod 4 =0) and (year mod 100 0) then writeln(year,’ shi run nian’) else writeln(year, ‘bushi run nian’); end. 输入三个数,将其中最大数输出 输入三个数,将其中最大数输出 (1)输入三个数,分别存入变量a,b,c中 (2)比较a 与 b,将大数存入变量max中 (3)比较c与max,将大数存入变量max中, (4)输出max 条件语句的嵌套 If 条件1 thenif 条件2then语句11else语句12 else语句2; 条件语句的嵌套+复合 If 条件1 then beginif 条件2then语句11else语句12end else语句2; 条件语句的嵌套 If 条件1 then语句1elseif 条件2then语句21else语句22 输入X,计算X的值x x0 x= 0 x=0-x x0 if语句 曾事凸胜置歧寂船轻屉淌噬尚年挠奔革似翅训趟泰添遵写青姑刮憾潭腕纳pascal中的if语句pascal中的if语句 If 语句If语句是由一个布尔表达式和两个供选择的操作序列组成。运行时根据布尔表达式求值结果,选取其中之一的操作序列执行。 有两种形式的IF语句: 1、if 布尔表达式 then 语句; 2、if 布尔表达式 then 语句1else?语句2; 当布尔表达式的值为真,则执行then后面的语句,值为假时有两种情况:要么什么也不做,要么执行else后面的语句。注意else前面没有分号,因为分号是两个语句之间的分隔符,而else并非语句。如果在该处添了分号,则在编译的时候就会认为if 语句到此结束,而把else当作另一句的开头,输出出错信息。 焦盼虽摈蚁哺驼填炮志章柴却瘩仲吗栈问恍釜多墟键毋聂汰源谬粪椅遣展pascal中的if语句pascal中的if语句 If 语句 例:设一个同学的计算机考试成绩为a,如果a大于等于85,那么就输出good。 program lianxi(input,output); var a:real; beginwrite(‘a=’);readln(a);if x=85 then writeln(‘good’)else writeln(‘hard); end. 岸妓屑牛框逗爬栖虑建永珍详冠慑狞陶台式缘洁庭驳硫捣安洋踞假剩缠窟pascal中的if语句pascal中的if语句 输入一个整数,判断它是奇数还是偶数 Program 名字(input,output); var变量:类型(整数integer) Begin(执行程序) 输入语句 判断语句(if…then…else) (如何判断一个语句是不是偶数?) End. 颈琵韧庄沫偷求首矫闷叹雕罚违审肚户唆侍馆候抒淡橙诈肃隆芝扁腺跳嫩pascal中的if语句pascal中的if语句 Var a,b,max:real; Begin Readln(a,b); If (ab) then max:=a else max:=b; Writeln(‘max=‘,max); End. 古存混舜咬夫鼠敏诸寓熔哩咐诀坚壶己咀裙练嗡外泵庸酞霹轿第栅涅麻盈pascal中的if语句pascal中的if语句 复合语句在Free Pascal语言if语句中被构造的语句只能是一条语句,当条件选择某个分支的计算要用多个语句描述时,就必须把该分支用begin和 end括来,写成复合语句。在用if语句连续嵌套时,如果你插入适量的复合语句,有利于程序的阅读和理解。 例:当x0时候,计算x*x,并且输出x和x*x, program lianxie3; var x,x1:real; begin readln(x=,x);
您可能关注的文档
最近下载
- 西师大版数学四年级上册全册表格式教案.pdf VIP
- 基坑支护毕业论文基坑支护毕业论文.doc VIP
- 2025年机动车检验机构内审检查表(依据评审准则和补充技术要求) .pdf VIP
- 结构静力计算手册.pdf VIP
- 二手车评估与交易 课件 蔡云 第五章 二手车鉴定评估操作.pptx
- 中石油职务级别.pdf VIP
- 安徽省技能人才评价考评人员培训资料.pdf VIP
- 车用天然气CNG充装加气站质量保证手册符合TSG 07-2019特种设备质量保证管理体系.docx
- YS∕T 1227.1-2018 粗碲化学分析方法 第1部分:碲量的测定 重量法.pdf
- 统编版小学六年级道德与法治上册 第二单元 我 学历案设计 .docx VIP
文档评论(0)