选择结构-if语句.pptxVIP

选择结构——if语句Pascal暑假微课系列第02课

火车托运行李，要根据行李的重量按不同标准收费。例如不超过50公斤，按每公斤0.35元收费。若超过50公斤，则其中50公斤按每公斤0.35元收费，其余超过部分按每公斤0.50元收费。现输入托运行李重量，要求计算并输出托运费。例一：

例一：火车托运行李，要根据行李的重量按不同标准收费。例如不超过50公斤，按每公斤0.35元收费。若超过50公斤，则其中50公斤按每公斤0.35元收费，其余超过部分按每公斤0.50元收费。现输入托运行李重量，要求计算并输出托运费。讨论：设托运行李重量为W，根据W是否超过50公斤，按不同的公式计算出托运费。设托运费为pay。W和pay均为实型。一级算法：1.读入W的值；2.根据W的大小选择不同的公式计算pay；3.输入paypay的公式如下：pay=W×0.3550×0.35+(W-50)×0.5W≤50W50

例一：火车托运行李，要根据行李的重量按不同标准收费。例如不超过50公斤，按每公斤0.35元收费。若超过50公斤，则其中50公斤按每公斤0.35元收费，其余超过部分按每公斤0.50元收费。现输入托运行李重量，要求计算并输出托运费。一级算法：1.读入W的值；2.根据W的大小选择不同的公式计算pay；3.输入pay二级求精：1.读入W的值；2-1.如果W≤502-2.则pay=W×0.352-3.否则pay=50×0.35+(W-50)×0.53.输入pay

添加标题W≤5001添加标题pay=W×0.3502添加标题pay=50×0.35+(W-50)×0.503添加标题真04添加标题假05

条件if语句：单击此处添加小标题格式一：if条件then语句1单击此处添加小标题格式二：if条件then语句1else语句2

条件if语句：添加标题格式一：if条件then语句1添加标题格式二：if条件then语句1else语句20102

二级求精：读入W的值；如果W≤50ifW≤50则pay=W×0.35thenpay=W×0.35否则pay=50×0.35+(W-50)×0.5elsepay=50×0.35+(W-50)×0.5输入pay

程序1.计算行李托运费Programyunfei(input,output);varW,pay:real;beginread(W);writeln(zhongliang=,W:8:2);ifW=50thenpay:=W*0.35elsepay:=50*0.35+(W-50)*0.5;writeln(pay=,pay:8:2)end.

例二：读入三个数，输出最大数。讨论：设三个数为A、B、C，由键盘输入。最大数为max。一级算法：1.输入A、B、C；2.将A与B中的大数存于max中；3.将C与max中的大数存于max中；4.输出max

例二：读入三个数，输出最大数。二级求精：1.输入A、B、C；2.将A与B中的大数存于max中；3.将C与max中的大数存于max中；4.输出maxifABthenmax:=Aelsemax:=BifCmaxthenmax:=C

程序2.求三个数中的最大数Programzuida(input,output);varA,B,C,max:real;beginread(A,B,C);writeln(thenthreenumbersare,A:8:2,B:8:2,C:8:2);ifABthenmax:=Aelsemax:=B;ifCmaxthenmax:=C;writeln(thelargestnumberis,max:8:2)end.