pascal 关于case语句的问题某运输公司的运输收费标准如下:设S表示运输路程(单位:公里),W表示货物重量(单位:吨),P表示每公里运费,F%表示根据运输路程的折扣.路程S

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/06 02:03:57
pascal 关于case语句的问题某运输公司的运输收费标准如下:设S表示运输路程(单位:公里),W表示货物重量(单位:吨),P表示每公里运费,F%表示根据运输路程的折扣.路程S

pascal 关于case语句的问题某运输公司的运输收费标准如下:设S表示运输路程(单位:公里),W表示货物重量(单位:吨),P表示每公里运费,F%表示根据运输路程的折扣.路程S
pascal 关于case语句的问题
某运输公司的运输收费标准如下:
设S表示运输路程(单位:公里),W表示货物重量(单位:吨),P表示每公里运费,F%表示根据运输路程的折扣.
路程
S

pascal 关于case语句的问题某运输公司的运输收费标准如下:设S表示运输路程(单位:公里),W表示货物重量(单位:吨),P表示每公里运费,F%表示根据运输路程的折扣.路程S
program a;
var
i,s,p,p1:double;
w:integer;
begin
readln(w,p,s);//依次输入重量,每公里价格,路程
case w of
0..249:p1:=s*p;
250..499:p1:=s*p*0.98;
500..999:p1:=s*p*0.95;
1000..1999:p1:=s*p*0.92;
2000..2999:p1:=s*p*0.90;
else p1:=s*p*0.85;
end;
writeln(p1:5:2);//控制输出格式
readln;
readln;
end.

p1是总运费哈.

free pascal case语句的格式问题(谢谢,在free pascal 的case语句中,如果想在case语句中直接输出,应该怎么样的格式呢?例如 case sum fo1:1:=writeln('zhou'); 2:2:=writeln('zhao');writeln(1,2);这样的格式应该怎么写? pascal 关于case语句的问题某运输公司的运输收费标准如下:设S表示运输路程(单位:公里),W表示货物重量(单位:吨),P表示每公里运费,F%表示根据运输路程的折扣.路程S 关于switch case语句的问题就是说如果一些内容很难归类,就是说用case归纳不全,比如1000-2000之内打9折,我总不可能case1111 case1112这样一条一条归类过去吧,这怎么设置啊?! 关于LABVIEW中case的问题帮忙解释一下里面两个case的作用 关于in case of的用法问题in case of accident对吗?为什么不加冠词? switch(a){ case 'a':case 'b':case 'c':输出语句; break; }这是运行的哪一个case语句呀? 关于switch语句的流程,请大神,老师详细叙述下switch(表达式){case 常量表达式1: case 常量表达式2: case 常量表达式3: 语句序列1;case 常量表达式4: 语句序列2;case 常量表达式5: 语句序列3;break;default: free pascal常见语句 switch-case语句的流程图 怎么画 switch语句后面的case语句能用表达式吗 有重复元素的排列问题pascal pascal关于因式分解的有关问题用pascal语言编出一个程序输入:100输出:2*2*5*5急用! 关于matlab语句解析问题/> Case语句那些表达式的值一定要是连续吗? Case语句那些表达式的值一定要是连续吗? matlab里的case语句多少到多少怎么写 pascal语言编程问题(free pascal求1—N中的素数的个数.(1 verilog case语句的一点问题在verilog里面,case语句的控制表达式可以是一个逻辑式子吗?eg Case(s1s2+s2s3+s1s3) 3d'000:out=a1; 3d'001:out=a2;………………