Задали по информатике(2)

я прогю на С++, но логику могу сказать - задаешь массив из 9 цифр (0 1 2 3 4 5 6 7 8 9 ), считываешь символ в переменную, далее создаешь цикл от 0 до 9 и в нем проверяещ, равна ли та переменная текущему элементу массива (индекс которого указывается циклом) , если да то выводишь что то типа "Цифра", если нет ( если не совпал ни с одним из элементов массива, то выводишь "не цифра". Вторая задача по аналогии, считываешь весь текст посимвольно, если символ совпал с одним из элементов массива, ты печатаешь его, и так весь текст проверяешь.. . Я могу на С++ написать, а паскаля не наю (