Написать программу в Pascal. Из элементов массива Х(5; 10; 0; 12; 6; 0; -8; 3; -9; 11) сформировать одномерный массив, состоящий из ненулевых элементов массива X, имеющих чётные индексы. Упорядочить полученный массив по убыванию. Если таковых не окажется, вывести фразу «Искомых элементов нет». Напечатать исходный массив и результаты обработки массива.