Помогите , нужна программка для этих задач PASCAl ABC:1)Вводится случайная

Помогите , нужна программка для этих задач PASCAl ABC:
1)Вводится случайная последовательность реальных чисел. Вычислить кол-во нечетных чисел в интервале от 2 до 31
2)Вводится случайная последовательность целых чисел. Отыскать произведение частей кратных 4 и великих нуля.
3)Составить программку для вычисления площади круга и длины диаметра, если радиус неизменная величина и равен 10 см.