Помогите написать программы,очень нужно.Pascal и QBasic

1.При помощи оператора DRAW нарисовать шестиугольник желтым цветом и залить его красным цветом.
2.Дана строка.Посчитать количество содержащихся в ней цифр 5 и 8.
3.Спросить у пользователя слово и раскрасить его побуквенно двумя цветами,чередуя их.
4.Даны две переменные A и B.Если их значения не равны,то присвоить каждой переменной сумму этих значений,а если равны,то присвоить переменным нулевые значеия,вывести на экран значение A и B.
5.Даны две переменные:A и B. Если их значения не равны,то присвоить каждой переменной максимальное из этих значений,а если равны,то присвоить переменным нулевые значения,вывести на экран значение A и B.
6.Составить программу,которая спрашивает координаты точки,а затем проверяет,попадает ли эта точка в квадрат Line(100,100)-(200,200)15,B
7.Вывести все чётные числа в диапазоне от 5 до 31 в порядке их убывания,а также количество этих чисел.Составить блок-схему.
8.Составить программу для получения слова :пульт из слов:пушка и летать.