Viết chương trình Free pascal để giải bài toán sau (dùng câu lệnh For-do) Tìm tất cả các số có 3 chữ số sao cho chữ số hàng đơn vi bằng tích chữ s

Viết chương trình Free pascal để giải bài toán sau (dùng câu lệnh For….do) Tìm tất cả các số có 3 chữ số sao cho chữ số hàng đơn vi bằng tích chữ số hàng chục với chữ số hàng trăm VD :111,121,…