0 ** Bạn có thể giúp tôi với chức năng trong Turbo Pascal không? ** Tôi gặp khó khăn khi viết một hàm sắp xếp lại số 4 chữ số để các chữ số tăng từ trái sang phải (nếu số 0 không được tính, số đó được coi là số 4 chữ số). **Ví dụ* 5467 -> 4567 ** Ví dụ 2: ** 1093 -> 1390 ** Đây là nỗ lực của tôi trong chức năng: ** `` ` hàm sort_number (n: số nguyên): số nguyên; var i, j, temp: số nguyên; bắt đầu Đối với tôi: = 1 đến 3 làm Đối với J: = I + 1 đến 4 làm if (n div (10 ^ (4 - j))) <(n div (10 ^ (4 - i))) bắt đầu Nhiệt độ: = N Div (10 ^ (4 - J)); n: = n - Chi tiết tại: https://tricksmmo.com/threads/moi-n...unction-trong-turbo-pascal-duoc-khong.105484/
