Паскаль: изучаем вложенные ветвления