составьте программу на паскале

найти суммы квадратов натуральных чисел от 15 до 25

Создать массив А из 10 целых чисел, принадлежащих промежутку [0;25) вывести полученный массив на экран. Родсчитать К - количество элементов массива значение которых превышает 12