Это программирование, паскаль, нужно написать программу
Дан одномерный массив A, состоящий из N элементов, N – заданное натуральное
число. Если элементы массива составляют строго монотонную последовательность, то
все положительные элементы массива заменить единицей, иначе оставить массив без
изменения.