Мова програмування Pascal. Оператор вибору case.