Viết chương trình nhập vào số n lập trình xuất ra màn hình cho biết có mấy số chia hết cho 3 trong khoảng

1) Viết chương trình nhập vào số n lập trình xuất ra màn hình cho biết có mấy số chia hết cho 3 trong khoảng từ 1 đến n.
2) Nhập số nguyên n, xuất tất cả các ước của n.
(Cả hai đều là lập trình pascal)