Доброго вам времени суток, необходима помощь в решении задачи на подпрограммы Pascal ABC:
Составить подпрограмму, которая проверяет заданный массив из N чисел, на упорядоченность по возрастанию(k=1 - если массив упорядочен, k=0 - иначе). С её помощью в основной программе обработать два массива и тот, который из них не упорядочен - обнулить(с помощью другой подпрограммы).