Программирование на Паскале: оператор полного ветвления в действии