Tính tổng các chữ số của số n

PASCAL( chủ đề hàm)
viết chương trình nhập vào số n (1000<n<100000)
a) tính tổng các chữ số của số n
b) in ra chữ số lớn nhất của sổ n
c)in ra chữ số bé nhất của số n