Помогите с pascal. пожалуйста

Задача 1 Строка вводится посимвольно конец ввода ".". Указать номер первой запятой, если ее нет сообщить.

Задача 2 Напечатать из заданного текста все символы от начала до первой "*", если звёздочки нет, вывести сообщение об отсутствии текста.

Задача 3 Сформировать текст из случайных символов. Заменить в нем третий символ на «+». Если есть в тексте такие же символы как третий ещё, то их тоже заменить. Сообщить исходный и измененный тексты.

Задача 4 Организовать диалог с пользователем: компьютер генерирует пароль (строку из 8 произвольных символов). Затем появляется сообщение: «Введите пароль» и пользователь вводит этот пароль, используя только заглавные символы, а компьютер, преобразует свой пароль к заглавным буквам, и сравнивает с паролем пользователя. Затем выводит сообщение «Все верно» или «Пароль введён неверно».

Задача 5. Проверить, есть ли в введённом тексте пара одинаковых символов. Сообщить эти символы, если есть и вывести сообщение об отсутствии пар символов.

Задача 6 В заданном тексте символ "-" удалить, если его нет, то добавить его в начало текста.

Задача 7 В тексте допущена ошибка. Вместо "мишки" везде напечатано слово "мышка". Исправить ошибку. Если ввели текст без указанного слова, то дописать его в конец текста.
Задача 8 Напечатать из заданного текста все символы от первой "*" и до конца, если звёздочки нет, вывести сообщение об отсутствии данного символа.

Задача 9 В предложении даны слова, разделенные пробелом. Для каждого слова найти число, равное отношению числа гласных букв к количеству всех букв. Упорядочить все слова по возрастанию этого числа.

Задача 10 В заданном тексте удвоить символ "=", если его нет, то добавить его в конец текста

Задача 11 Задана строка. Обращаясь к символам строки как элементам массива, переставьте вторую половину строки в начало строки. Выведите исходный текс и изменённый текст.

Задача 12 Дана строка. Выделить второе слово, записать его в новую переменную и добавить в конце «.». Вывести на экран исходный текст и найденное слово, если в тексте нет второго слова, сообщить об этом.

Задача 13 Напечатать из заданного текста все символы от первой "*" и до второй "*", если звёздочки нет или только одна звёздочка в тексте, вывести сообщение о невозможности решить поставленную задачу.

Задача 14 Вывести на экран заданный текст, заменив все «а» на случайно сгенерированный символ (по коду).