1)Текст задан строкой: var St: string
1. Напечатать все слова, отличные от Hello
2. Напечатать то слово, которое лексикографически (по алфавиту) предшествует всем другим словам
3. Напечатать текст, составленный из последних литер всех слов
4. Напечатать текст, составленный из средних литер всех нечетных слов
5. Напечатать все слова, содержащие удвоенное н ("нн")
6. Напечатать те слова, которые являются симметричными (например: казак, шалаш)
7. Напечатать все слова, удалив из них первую букву
8. Напечатать все слова, удалив из них последнюю букву
9. Напечатать все слова, удалив из них все последующие вхождения первой буквы
10. Напечатать все слова, удалив из них все предыдущие вхождения последней буквы
11. Напечатать все слова, удалив среднюю букву у слов нечетной длины
12. Напечатать все слова, перенеся их первую букву в конец
13. Напечатать все слова, перенеся их последнюю букву в начало
14. Напечатать все слова, содержащие только русские буквы
2)Написать функцию
function Test(word:string): boolean
принимающую значение True, если
1. Строка является словом
2. Первая буква строки входит в нее еще раз
3. Последнее слово строки входит в нее еще раз
4. Буквы строки упорядочены по алфавиту
5. Количество гласных (a, e, i, o, u) превосходит количество других символов
6. Количество заглавных букв в строке превосходит количество прописных
7. Количество русских букв в строке превосходит количество латинских
8. Строка составлена только из строчных русских букв
9. В строке больше букв, чем знаков
10. В строке есть восклицание (!) и вопрос (?)
11. Строка является символьным представлением натурального числа ("122", "34" и т.д.)
12. В строку входят литеры, содержащиеся в глобальной переменной W типа string
13. Строка является идентификатором
14. Строка является перевертышем