Code là nhập từ bàn phím C++, Python, Pascal

```pascal
program TNUM;

var
f_in, f_out: TextFile;
n, i: LongInt;
a: LongInt;
isTNM: Boolean;

function CheckTNM(num: LongInt): Boolean;
var
hundreds, tens, ones: Integer;
begin
hundreds := num div 100; // lấy chữ số hàng trăm
tens := (num div 10) mod 10; // lấy chữ số hàng chục
ones := num mod 10; // lấy chữ số hàng đơn vị

// Kiểm tra xem tất cả các chữ số có khác nhau không
Result := (hundreds <> tens) and (hundreds <> ones) and (tens <> ones);
end;

begin
AssignFile(f_in, 'TNUM.INP');
AssignFile(f_out, 'TNUM.OUT');
Reset(f_in);
Rewrite(f_out);

ReadLn(f_in, n);
for i := 1 to n do
begin
Read(f_in, a);
isTNM := CheckTNM(a);

if isTNM then
WriteLn(f_out, 'YES')
else
WriteLn(f_out, 'NO');
end;

CloseFile(f_in);
CloseFile(f_out);
end.
```

Giải thích:

1. Chương trình bắt đầu bằng cách khai báo các biến cần thiết, trong đó có `f_in` và `f_out` để xử lý nhập và xuất tệp.
2. Hàm `CheckTNM` nhận đầu vào là một số nguyên và kiểm tra xem đó có phải là TNM hay không. Cách kiểm tra là lấy từng chữ số của số nguyên và so sánh chúng:
- Nhập số vào ba biến: chữ số hàng trăm, hàng chục và hàng đơn vị.
- Phân tích các chữ số và đảm bảo rằng chúng khác nhau bằng cách so sánh.
3. Trong phần chính của chương trình, tệp đầu vào được mở và đọc số `N` – số lượng số nguyên cần kiểm tra.
4. Với mỗi số nguyên đọc được từ tệp, gọi hàm `CheckTNM` để xác định nó có phải là TNM không.
5. Kết quả "YES" hoặc "NO" được ghi vào tệp đầu ra tùy thuộc vào việc số đó có phải là TNM hay không.

Chương trình này đảm bảo kiểm tra hiệu quả từng số nguyên theo yêu cầu và trả về kết quả chính xác cho từng số.