помогите написать программы на языке паскаль

первая задача: найти кол-во чётных цифр целого положительного числа
вторая задача: найти первую цифру числа