1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| _JC_ |
Сообщение
#1
|
![]() Новичок ![]() Группа: Пользователи Сообщений: 12 Пол: Мужской Реальное имя: Макс Репутация: 0 |
Помогите решить задачку!
Дано: текст на русском языке. Задане: переформатировать текст так, чтобы длина любой строки не превосходила 40 символов.(Выравнивать по правому краю не требуется). Спасибо заранее! |
![]() ![]() |
| _JC_ |
Сообщение
#2
|
![]() Новичок ![]() Группа: Пользователи Сообщений: 12 Пол: Мужской Реальное имя: Макс Репутация: 0 |
А почему каждый символ воспринимается только со 2-ого нажатия можно ли это исправить? И как сделать чтобы он переносил не на серидине слова а его целиком если оно не влазит в строку???
|
| klem4 |
Сообщение
#3
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Цитата(_JC_ @ 13.10.2005 17:01) А почему каждый символ воспринимается только со 2-ого нажатия можно ли это исправить? И как сделать чтобы он переносил не на серидине слова а его целиком если оно не влазит в строку??? не заню, у меня воспринимает с первого нажатия нормально, а поповоду второго ... мне кажется ты не понял, тут осуществляется ввод текста следующим образом : начинаешь ввод, если ввел 40 символов, то начинается заполнение второй строчки , после ее заполнения следует третья и т.д. или же весь процесс останавливается при нажатии ESC. -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
_JC_ Текст 13.10.2005 17:45
volvo _JC_, поиском пользоваться когда-нибудь будем? :a… 13.10.2005 18:24
Shura Думаю, можно сделать так:
Открываем исходный файл … 13.10.2005 18:27
_JC_ Спасибо большое прости что не воспользовался поиск… 13.10.2005 19:09
klem4 объяви s : string, больше сорока ты в нее не запиш… 13.10.2005 19:23
volvo klem4, а проверять на нажатие "расширенной… 13.10.2005 19:45
klem4 исправил вроде :unsure: 13.10.2005 19:54
volvo
Вот так:
uses crt;
const
maxLen = 40;
delimi… 13.10.2005 21:10
_JC_ Volvo мщжет ты мне подскажешькак мне сделать эту з… 13.10.2005 20:07
klem4
и как ты себе это представляешь при твоей постан… 13.10.2005 20:09
_JC_ Да вероятно ты прав извини! 13.10.2005 20:35
_JC_ Извиняюсь за то что беспокою, но этот Му.....ЖИК с… 15.10.2005 2:22
volvo _JC_, приводим задачу к уже решенной :D :
uses cr… 15.10.2005 2:34![]() ![]() |
|
Текстовая версия | 23.11.2025 2:57 |