Перенос слова, перенести слова, используя 3 правила |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Перенос слова, перенести слова, используя 3 правила |
Gold_Fish |
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 28 Пол: Женский Реальное имя: Марина Репутация: 0 |
Помогите, пожалуйста, очень прошу, хотя бы частично:
Перенос слова. Перенос русского слова с одной строки на другую с большей вероятностью выполняется правильно, если пользоваться следующими правилами: 1)две идущие подряд гласные можно разделить, если перед первой из них стоит согласная, а за второй идет хотя бы одна буква (буква й при этом рассматривается вместе с предшествующей ей гласной как единое целое); 2) две идущие подряд согласные можно разделить, если первой из них стоит гласная, а в той части слова, которая идет за второй согласной, имеется хотя бы одна гласная (буквы ь, ъ вместе с предшествующей согласной рассматриваются как единое целое); 3) если не удается применить первые два правила, то слово разбивают так, чтобы первая часть содержала более чем одну букву и оканчивалась на гласную, а вторая содержала хотя бы одну гласную. Дан текст, состоящий из нескольких строк. Преобразовать текст таким образом, чтобы длина строк не превышала заданного значения, используя при этом перенос слов. Как найти ближайший к концу строки пробел, если при заданном значении слово "как бы разбивается"? Как осуществить на Паскале приведенный выше перенос??? Сообщение отредактировано: Gold_Fish - |
Gold_Fish |
Сообщение
#2
|
Новичок Группа: Пользователи Сообщений: 28 Пол: Женский Реальное имя: Марина Репутация: 0 |
Что-то не очень понимаю вот это место:
Цитата for i:=1 to Length(VowDOS) do Include(Vow,VowDOS[i]); for i:=1 to Length(ConDOS) do Include(Con,ConDOS[i]); for i:=1 to Length(IShDOS) do Include(ISh,IShDOS[i]); for i:=1 to Length(SHzDOS) do Include(SHz,SHzDOS[i]); И почему-то перед [i] ошибка №121 Что тогда значит "i" ? Ещё вот это можно пояснить: Цитата s:=s+Copy(t,1,Ord(Map[i]))+'-'; Что такое тут Copy(t,1,Ord(Map[i])) ? Сообщение отредактировано: Gold_Fish - |
Lapp |
Сообщение
#3
|
Уникум Группа: Пользователи Сообщений: 6 823 Пол: Мужской Реальное имя: Лопáрь (Андрей) Репутация: 159 |
> И почему-то перед [i] ошибка №121
TP этого действительно не пропускает. Я думал, что ты уже перешла на FPC.. Для того, чтобы это скомпилить в TP, добавь тип string в определение конмтант, вот так: VowDOS='АаЕеЁёИиОоУуЫыЭэЮюЯя'; > Что-то не очень понимаю вот это место: > for i:=1 to Length(VowDOS) do Include(Vow,VowDOS[i]); > ... Это заполнение множеств. Раньше я задавал их непосредственно (см. старый вариант проги), а сейчас через строчку-константу. Так удобнее, согласись. Правда, требует лишних операторов (вот этих). > Что тогда значит "i" ? Это переменная цикла. См. описание цикла FOR в документации. Рекомендую описание: http://download.excode.ru/download277.html > Что такое тут Copy(t,1,Ord(Map[i])) ? Копирование части строки. В указанном документе см. Приложение 4, Модуль System, П 4.1.3. Давай, Рыбка - барахтайся, а то утонешь! -------------------- я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой |
Текстовая версия | 27.04.2024 12:07 |