Дан целочисленный массив из 30 элементов. элементы массива могут принимать целые значения от 0 до 1 включительно. написать программу, которая находит минимальный из чётных элементов массива, затем уменьшает все элементы массива, кратные 5, на значение этого минимального элемента, и выводит изменённый массив. если в массиве нет чётных элементов, он остаётся без изменений. например, из массива
7, 5, 2, 4, 8, 10, 14, 15
программа должна получить массив
7, 3, 2, 4, 8, 8, 14, 13
язык pascal