 Строки, Помогите |
Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Klimoff |
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 10 Пол: Мужской Репутация:  0   |
Составьте программу, меняющую местами правую и левую половины строки (если число символов в строке – не четное, «серединный» символ оставить без изменений)
|
   |
 
|
  |
Ответов
| volvo |
Сообщение
#2
|
|
Гость |
Copy + Length тебе в помощь: решение получается в одну строку...
Или циклом от первого символа строки до середины, и менять с соответствующим символом от конца строки (но это - 2 строчки  ) |
|
|
|
| Real |
Сообщение
#3
|
|
Гость |
Цитата(volvo @ 24.05.2006 13:50)  Copy + Length тебе в помощь: решение получается в одну строку... Или циклом от первого символа строки до середины, и менять с соответствующим символом от конца строки (но это - 2 строчки )Я в этом не очень понимаю, не мог бы ты полностью написать решение |
|
|
|
Сообщений в этой теме
Klimoff Строки 24.05.2006 17:47
APAL offtop:
Выбери сам какой из профилей удалить - … 24.05.2006 20:51
Klimoff Выбери сам какой из профилей удалить - Real или Kl… 24.05.2006 21:41 APAL If Odd(Length(st)) then St:=Co… 24.05.2006 21:31 APAL Смотри 6-ой пост. 24.05.2006 21:55 volvo APAL, а без If ? :)
st :=
copy(st, length(st… 24.05.2006 21:56 APAL
APAL, а без If ? :)
st :=
copy(st, length(s… 24.05.2006 22:00 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 28.04.2024 6:01 |
Связь с администрацией: bu_gen в домене octagram.name