1樓:匿名使用者
四、 case語句 分情況語句適用於對一個條件的多種情況的響應。
格式:case 表示式 of
標號1:語句1;
標號2:語句2;
標號n:語句n;
else 語句n+1
end; case語句在使用時有幾點要注意: 1. end與case對應;標號與語句之間用「:
分隔;else與語句之間不用分隔符。 2. 標號必須是一常量,其型別與表示式的型別一致 3.
可以多個標號對應同一條語句 4. 語句可以是多個語句,但必須用語句括號(begin……end)括起 5. case語句也可以巢狀例1:
輸入兩個數值(均不為0)及一個算術運算子,輸出其運算的結果。program pp;var x,y,s:real;ch:
char;beginread(x,y);read(ch);case ch of『+』s:=x+y;『-s:=x-y;『*s:
x*y;『/s:=x/yend;writeln(x,ch,y,』=s);end. 例2:
18,也提供了「自己加」或「協助加」兩個服務等級,這樣使用者可以得到5%或10%的優惠。編一個程式,使用者輸入加油量、汽油品種和服務型別(f-自動,m-自己,e-協助),然後計算應付款。
program pcase1;
varoil,help:char;
kg,total:real;
beginreadln(kg);
readln(oil);
readln(help);
case oil of
a': total:=;
b': total:=;
c': total:=;end; case help of
f':;m': total:=total*(;
e': total:=total*(;end; writeln('total is ',total:10:2);
end. 練習:
1、 當前小學生的成績單由以前的百分制改為優秀、良好、合格、不合格四個等級的等級制。編一程式完成分數的自動轉換工作。轉換規則如下:
60分以下的為不合格;60到69分為合格;70到89分為良好;90分以上的為優秀。(提示:可以利用div運算來使程式更簡明)2、列印某年某月有多少天。
b、利用mod運算可以判斷一個數能否被另一個數整除)
2樓:匿名使用者
if只能針對一個條件實現兩個個分支,case可以根據一個表示式的值實現多個分支。
事實上幾乎所有的case語句都可以用符合if來實現,但是那樣程式不直觀,書寫的內容也較多。
相反,case語句不能取代各種if語句。
3樓:匿名使用者
var i: integer; i:= 2; case i of 0:
showmessage('x');1: showmessage('y');2: showmessage('z');case後的變數必須為有序變數型別。
pascal 語言中的case語句
C語言中,swichcase語句中,case後面只能
準確的說case後面跟來的源是一個確定的值,由於常量表示式也好,邏輯表示式 在c語言中邏輯表示式的值只有兩種而且是整形數值1或者0 也好都是返回的一個確定的值。因此switch case語句中case後可以跟邏輯表示式。注 剛剛我試了一下,確實可以 switch 只能跟確定的值,而且只能是整形,字元...
請問在pascal語言中div,mod與的不同點與共同點
div是整除 div的結果接近答案 mod是取餘 mod的結果是餘數 div是整除,mod是取餘,是正常的除法 除不盡的時候有小數的 例 10 div 3 3 10 mod 3 1 10 3 3.333333.div 整除運算,是兩個整型相處去整數部分,要截尾。例如2 div 3答案就是0,而不是四...
pascal中的case句怎麼用
pascal中的case語句形式如下 case 表示式 of 常量1 語句1 常量2 語句2 常量n 語句n else 語句 n 1 可選項 end 其中常量1 n為固定值,不能是資料範圍,但可以是資料集合。表示式,僅可以取變數本身,也可以是帶運算的變數,也可以是邏輯表示式,但邏輯表示式的話,其下方...