 Программа на строки, Срочно нужно сделать |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| TORETO |
 30.11.2007 20:56
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 31 Пол: Мужской Репутация:  0   |
Заданный текст распечатать по строкам, понимая под строкой либо очередные 6 литер,если среди них нет запятой, либо часть текста до запятой включительно.
|
   |
 
|
  |
Ответов
| klem4 |
2.12.2007 15:15
Сообщение
#2
|
 Perl. Just code it! Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
вообще тут конечно надо бы уточнить ... введи строку '123456,123456'
вот какой должен быть результат ? на сколько я понимаю из условия: Цитата либо часть текста до запятой включительно. то получиться должно 123456, 123456 а может и нет ... я честно говоря не уверен. Сообщение отредактировано: klem4 - 2.12.2007 15:17 -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|
|
|
Сообщений в этой теме
TORETO Программа на строки 30.11.2007 20:56
klem4 Ты бы хоть уточнил как текст задан, строка, массив... 30.11.2007 21:06 Ozzя Опять задачник Пильщикова? :wink: 1.12.2007 13:03 TORETO Да, опять задачник Пильщикова.Кстати, к нему нет о... 2.12.2007 12:18 klem4 вот как вариант, надо конечно чонить покороче прид... 2.12.2007 13:32 volvo Не пойдет... Проверяем со строкой:
s := '11111... 2.12.2007 14:32 klem4 так разделитель вроде запятая, а не точка с запято... 2.12.2007 14:34 volvo А, ну да...
Вот так будет меньше писанины, кстати... 2.12.2007 14:41 klem4 так запятая учитывается, по печатается отдельно, а... 2.12.2007 14:59 TORETO Спасибо большое сейчас попробую. 2.12.2007 15:06 volvo Что я теперь делаю не так:
? 2.12.2007 15:08 volvo Это с какой стати?
Что, среди первых 6-ти символо... 2.12.2007 15:17 klem4 согласен ... ну значит вопрос решен :) 2.12.2007 15:19 TORETO Объясните что значит строка
p:=byte(p=0)*6+p
[b... 2.12.2007 17:24
volvo Если p = 0, значит это True - следовательно Byte(p... 2.12.2007 17:28 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 20.07.2025 14:37 |