Как в Pascal ABC использовать case > 1 раза?

Мне в программе нужно 3 раза использовать case, но работает только первый case...помогите плиз!

case a of
...
end;

case b of
...
end;

case c of
...
end;