Составить программу) Дан целочисленный массив из N элементов ,заполненный случайными числами . Отсортировать массив по убыванию его цифрового корня.Вывести первоначальный и отсортированный массив на экран .Использовать процедур...

Составить программу) Дан целочисленный массив из N элементов ,заполненный случайными числами . Отсортировать массив по убыванию его цифрового корня.Вывести первоначальный и отсортированный массив на экран .Использовать процедуры заполнения массива,вывода на экран ,процедуру сортировки и функцию нахождения цифрового корня.