"С помощью множества составить программу,подсчёта количества цифр в десятичной системе счисления"
В десятичной системе счисления в среднем приблизительно 10 цифр.
Посчитал на пальцах: {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}.
Вот только не помню, есть ли у Паскаля библиотека fingers или нет.
А если серьезно, то тебе нужна программа, которая считает количество цифр в веденном пользователем числе (натуральном, видимо), так? Ну, это делается нетрудно, да еще и с множествами - совсем просто.
Пишешь процедуру заполнения множества цифрами введенного пользователем числа (как извлекать из строки символы ты знаешь). Поскольку множество отличается от массива тем, что оно не упорядочено, а потому в нем не может быть нескольких одинаковых элементов, то добавляя один и тот же символ, вытащенный из разных мест строки, повторов во множестве ты не получишь, так что смело можно будет посчитать количество элементов в полученном множестве, не боясь одну и ту же цифру посчитать дважды.
Это в случае, если тебе требуется посчитать количество различных цифр в числе, введенном пользователем (надеюсь, именно это от тебя в задаче и требовалось). Если же требовалось посчитать количество всех цифр в числе (т.е. длину числа в цифрах), то тут тогда не ясно, нафига нужны множества, когда достаточно было бы использовать строки.