Giúp sửa bài tập Pascal 11 Noi2wAp

ai có thể giúp em tìm lỗi sai của đoạn chương trình em đóng khung được không ạ? em không hiểu sao khi chạy chương trình nó toàn ra kết quả sắp xếp sai thôi ạ :too_sad: