create pasajes en pascal