IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Программа на строки, Срочно нужно сделать
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 31
Пол: Мужской

Репутация: -  0  +


Заданный текст распечатать по строкам, понимая под строкой либо очередные 6 литер,если среди них нет запятой, либо часть текста до запятой включительно.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


вообще тут конечно надо бы уточнить ... введи строку '123456,123456'

вот какой должен быть результат ?

на сколько я понимаю из условия:

Цитата
либо часть текста до запятой включительно.


то получиться должно
123456,
123456

а может и нет ... я честно говоря не уверен.

Сообщение отредактировано: klem4 -


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
TORETO   Программа на строки   1.12.2007 0:56
klem4   Ты бы хоть уточнил как текст задан, строка, массив…   1.12.2007 1:06
Ozzя   Опять задачник Пильщикова? :wink:   1.12.2007 17:03
TORETO   Да, опять задачник Пильщикова.Кстати, к нему нет о…   2.12.2007 16:18
klem4   вот как вариант, надо конечно чонить покороче прид…   2.12.2007 17:32
volvo   Не пойдет... Проверяем со строкой: s := '11111…   2.12.2007 18:32
klem4   так разделитель вроде запятая, а не точка с запято…   2.12.2007 18:34
volvo   А, ну да... Вот так будет меньше писанины, кстати…   2.12.2007 18:41
klem4   так запятая учитывается, по печатается отдельно, а…   2.12.2007 18:59
TORETO   Спасибо большое сейчас попробую.   2.12.2007 19:06
volvo   Что я теперь делаю не так: ?   2.12.2007 19:08
klem4   вообще тут конечно надо бы уточнить ... введи стро…   2.12.2007 19:15
volvo   Это с какой стати? Что, среди первых 6-ти символо…   2.12.2007 19:17
klem4   согласен ... ну значит вопрос решен :)   2.12.2007 19:19
TORETO   Объясните что значит строка p:=byte(p=0)*6+p [b…   2.12.2007 21:24
volvo   Если p = 0, значит это True - следовательно Byte(p…   2.12.2007 21:28


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 28.03.2024 19:01
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name