Помогите пожалуйста написать программу в Паскале. Дано натуральное семизначное число Р. Вывести на экран цифры чила, которые делятся на а без остатка. Определить кол-во цифр, удовлетворяющих этому условию.