Условие:
Лазарус (Free Pascal) Дан одномерный массив B (n=10) и целые числа d и b. Найти сумму и количество элементов массива кратных заданному числу d. Сформировать одномерный массив по правилу: четные элементты увеличить на число b, а число d вычесть из нечетных элементов. Вывести новый одномерный массив
