RosettaCodeData/Task/Conditional-structures/Pascal/conditional-structures-3.pascal

8 lines
128 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
Case X of
'A' : statement ;
'B' : statement ;
in ['C'..'W'] : statement ;
else
Statement ;
end;