Viết chương trình pascal

Viết liên tiếp các số tự nhiên 1, 2, 3, … từ trái qua phải, tạo thành dãy số vô hạn: 123456789101112131415161718192021222324…
Yêu cầu: Viết chương trình tìm chữ số ở vị trí thứ k (từ trái qua phải) trong dãy số vô hạn trên và cho biết chữ số đó thuộc số tự nhiên nào?
Dữ liệu: Vào từ bàn phím số nguyên dương k (1 ≤ k ≤ 1018).
Kết quả: In ra màn hình số ở vị trí thứ k và số tự nhiên chứa số thứ k đó.