Viết chương trình theo pascal

viết ct theo pascal
----- Nội dung dịch tự động từ ảnh -----
Cho một số nguyên dương N có không quá 255 chữ số
●
Yêu cầu:
Tính tích các chữ số lẻ có trong N
-
In ra các chữ số nguyên tố có trong N
Tính hiệu của số N với số nhỏ nhất tìm được
Dữ liệu vào: Nhập từ bàn phím số N
Dữ liệu ra: In ra màn hình kết quả thỏa mãn yêu cầu trên
VD:
Nhap so N = 365
Tich cac so le co trong 325 la: 15
Cac so nguyen to co trong 325 la: 3 - 5
So nho nhat la: 356
365-356=9