C клавиатуры вводятся натуральные числа. Последовательность заканчивается 0. Определить количество чисел, которые начинаются на 4 и делятся на 6

Помогите, пожалуйста, с программой (язык Паскаль)