Пожалуйста - Pascal (Паскаль)

Решить с использованием функции.
1. Написать программу вычисляющая процент от числа.
3. Составить программу, которая выводит строку одинаковых символов. Длина строки и символ вводится с клавиатуры.
4. Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объем этого куба.
5. Подсчитать количество цифр в введенной строке.
6. Найти 20 первых натуральный чисел делящихся на 13 или 17 начиная с 500