case változó of
  érték_1: utasítás_1; 
  érték_2: utasítás_2; 
   .. 
  érték_n: utasítás_n; 
  else utasítás_különben;
end;