OvsS | Дата: Вторник, 23.03.2010, 13:41 | Сообщение # 1 |
Сержант
Группа: Новичок
Сообщений: 9
[ 0 ]
Статус: Offline
| Дано натуральное число n, символы S1, ...,Sn. Известно, что среди данных символов есть хотя бы один, отличный от пробела. Требуется преобразовать последовательность S1, ..., Sn следующим образом. Удалить пробелы, которыми начинается и заканчивается последовательность, а так же все внутренние пробелы. Если пробелов нет, оставить без изменения.
|
|
| |
ignorer | Дата: Вторник, 23.03.2010, 18:02 | Сообщение # 2 |
Генералиссимус
Группа: Модераторы
Сообщений: 602
[ 18 ]
Статус: Offline
| вот решение: var s, s2 : string; i : integer; begin cls; read(s); for i:=1 to length(s) do if s[i]<>' ' then s2:=s2+s[i]; write(s2); end.
|
|
| |
OvsS | Дата: Понедельник, 29.03.2010, 19:16 | Сообщение # 3 |
Сержант
Группа: Новичок
Сообщений: 9
[ 0 ]
Статус: Offline
| Огромное спасибо!!!
|
|
| |