Помогите с задачей по Delphi7

[болат]

1)даны действительные числа x,y.Меньшее из этих двух чисел заменить их полусуммой,а больше их удвоенным произведением.

2)Оставить в словах только последние вхождения каждой буквы.

3)Перенести в начало последовательности слова-полиндромы(перевертыши),сохраняя исходный порядок следования слов.

4)Напечатать те слова последовательности в которых хотя бы на одной нечетной позиции находиться буква "A".

5)Напечатать те из двузначных чисел которые делятся на 5,но не делятся на 2.

6)С помощью оператора repeat напишите программу суммы чисел в диапазоне от 100 до 200 включительно,которые нацело делятся на 8.

7)Определить суммарный объем в литрах 12 вложенных друг на друга шаров со стенками 5мм.Внутренний диаметр внутреннего шара равен 10см.Считать,что шары вкладываются друг на друга без зазоров.

8)Даны 2 множества А и В.Постройте из них следующие множество (a-+(b-a)+a*b.

9)Дан текст из цифр и строчных латинских букв,за которыми следует точка.Определить,каких букв гласных(a,e,i,o,u) или согласные больше в этом тексте.

Помогите решить!!!

[болат]

За 300р.решите)))Срочно надо!!!!

1,5,6- не надо,я их решил)))