- 1、本文档共28页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
3-1if语句及其嵌套
If语句及其嵌套 布尔运算真值表 简单的if语句 格式:(1)if 布尔表达式(或称“条件”)then 语句1;(2)if 布尔表达式 then 语句1 else 语句2;注意(2)格式的“语句1”后面无“;”号。 功能格式(1):先计算布尔表达式的值,若值为true(真),则执行语句1,否则不执行任何操作,而转向执行if语句的下一条语句。格式(2):先计算布尔表达式的值,若值为true,则执行语句1,否则执行语句2,然后转向执行if语句的下一条语句。 例题 3-1-1:输入一个整数a,判断是否为偶数。(是输出“yes”否则输出“no”)。 例题 3-1-1:输入一个整数a,判断是否为偶数。(是输出“yes”否则输出“no”)。 3-1-2:超市里卖电池,每个电池8角钱,若数量超过10个,则可打7.5折 ,计算购买x个电池的总价。 3-1-2:超市里卖电池,每个电池8角钱,若数量超过10个,则可打7.5折 ,计算购买x个电池的总价。 输入一个数x,要求不使用abs函数,输出其绝对值。 program ex; var x:real; begin readln(x); if x0 then writeln(-x) else writeln(x); end. 输入一个数x,要求不使用abs函数,输出其绝对值。 节日期间,某超市购物优惠规定:所购物品不超过100元时,按九折付款,如果超过100元,超过部分按七折收费,编一程序完成超市自动计费的工作。 节日期间,某超市购物优惠规定:所购物品不超过100元时,按九折付款,如果超过100元,超过部分按七折收费,编一程序完成超市自动计费的工作。 将输入的两个非负实数中较大的放在max里,小的放在min里,并输出。 program ex; var max,min,t:real; begin read(max,min); if maxmin then begin t:=max; max:=min; min:=t; end; writeln(max, ,min) end. 将输入的两个非负实数中较大的放在max里,小的放在min里,并输出。 编写一与电脑猜“红”或“黑”的游戏。 分析:用1代表红,0代表黑。先由计算机先出答案,然后再由人猜,猜对输出“YOU WIN”否则输出“YOU LOST”。为了模拟猜“红”或“黑”的随意性,程序中需要用到随机函数random(n)。 函数是什么呢,例如大家都知道|-2|=2,|58|=58,那么|x|=?。 如果我们用y表示|x|,那么 .这里y=|x|就是一个函数,也就是说函数是一个关于一个或多个自变量(未知量,如上例中的x)的运算结果。 在pascal语言中,系统提供了许多内部函数,其中包括|x|函数,当然它用abs(x)表示。我们如果要求x2-y的绝对值,可以调用内部函数abs(x*x-y)即可求得。Random(n)也是一个内部函数,调用它能得到0~n-1之间的整数(但它不确定的,或说是随机的)。Random随机产生0-1之间的小数。同时由于函数是一个运算结果,所以函数的调用只能出现在表达式中。程序见下页 红黑程序如下 program ex; var computer,people:integer; begin randomize; computer:=random(2); write(You guess(0-Red 1-Black):); readln(people); If people=computer then writeln(YOU WIN) else writeln(YOU LOST); end. 红黑程序如下 If语句的嵌套 格式1:if 布尔表达式1 then if 布尔表达式2 then 语句21 else 语句22 else 语句12; 格式2:if 布尔表达式1 then 语句11 else if 布尔表达式2 then 语句21 else
文档评论(0)