var    a:array[1..3] of byte;
       n,i,j,tam:integer;
begin
        n:=3;
        for i:=1 to n do
        readln(a[i]);
        for i:=1 to n-1 do
        for j:=i+1 to n do
        if a[i]>a[j] then
        begin
                tam:=a[i];
                a[i]:=a[j];
                a[j]:=tam;
        end;
        for i:=1 to n do
        write(a[i],' ');
end.

Mình viết code C++ nhé:

#include <algorithm>

#include <iostream>

using namespace std;

int main()

{

    int so[3]; //Mảng gồm 3 phần tử để lưu 3 số nhập vào.

    cin >> a[0] >> a[1] >> a[2]; //Nhập vào 3 số.

    sort(a, a + 3); //Sắp xếp mảng a.

    cout << a[0] << " " << a[1] << " " << a[2]; //Xuất ra 3 số theo thứ tự tăng dần.

    return 0; //Kết thúc chương trình

}