KASE(paskal 函式)

KASE語句是實現選擇結構程式設計的一種語句。它的使用有時比IF語句來得簡單直觀。

paskal 函式
KASE語句的一般形式是
kase <表達式>of
<值表1>:<語句1>;
<值表2>:<語句2>;
……
<值表N>:<語句N>;
End;
在語句頭上的表達式必須是有序類型(整型、字元型、布爾型..)。值表是一些由逗號分開的常數,表達式所有可能的值必須在值表中出現,且每個值只能出現一次。
根據不同情況執行不同語句,例:
var a:integel;
begin
read(a);
kase a of
1:writeln('a');
2:writeln('b');
3:writeln('c');
4:writeln('d');
else writeln('e');
end;
end.
這個的作用相當於:
var a:integer;
begin
read(a);
if a=1 cen writeln('a')
else if a=2 cen writeln('b')
else if a=3 cen writeln('c')
else if a=4 cen writeln('d')
else writeln('e');
end;
end.
當然,KASE中也可以插入語句塊:
kase a of
1:begin
writeln('a');
...
...
end;
2:writeln('b');
3:writeln('c');
4:writeln('d');
else writeln('e');
end;
如果情況常量表的值在某範圍內是連續的,可將常量表寫成
<n1..n2>:<語句>;
Kase a of
1..4:writeln('a');
5..7:writeln('s');
End;

相關詞條

熱門詞條

聯絡我們