2 / 2 / 0
Регистрация: 07.10.2012
Сообщений: 89
1

Удалить из строки лишние пробелы, оставляя между словами только по одному пробелу

22.12.2012, 18:25. Показов 2899. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Удалить из строки лишние пробелы, оставляя между словами только по одному пробелу
1
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.12.2012, 18:25
Ответы с готовыми решениями:

Отредактировать предложение, удаляя из него лишние пробелы, оставляя по одному пробелу между словами
Отредактировать предложение, удаляя из него лишние пробелы, оставляя по одному пробелу между...

Удалить лишние пробелы, оставив только по одному между словами.
Дан текст, состоящий из N строк. Слова разделены несколькими пробелами. Требуется удалить лишние...

Удалить лишние пробелы в тексте, оставляя их по одному
нужно удалить лишние пробелы в тексте оставляя их по одному . в моей проге удаляется только один...

Отредактировать предложение, удаляя из него лишние пробелы, оставляя только по одному пробелу между словами
Отредактировать предложение, удаляя из него лишние пробелы, оставляя только по одному пробелу между...

1
Почетный модератор
7966 / 3937 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
22.12.2012, 22:10 2
Лучший ответ Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
uses crt;
var s: string;
    i: byte;
    
begin
write('s='); readln(s);
for i:=length(s)-1 downto 1 do
    if (s[i]=' ') and (s[i+1]=' ') then delete(s,i,1);
write('s=',s);
readln;
end.
4
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.12.2012, 22:10
Помогаю со студенческими работами здесь

Удалить повторяющиеся пробелы между отдельными словами строки (оставляя по одному пробелу)
Введите предложение, слова в котором разделены пробелами и в конце которого стоит точка. Удалите...

Убрать все лишние пробелы между словами (оставить только по одному пробелу)
Dim St As String, Stl As String Dim P As String * 10, Sym As String * 1 Dim KR As Long, KN As...

Откорректировать файл, удаляя пустые строки, пробелы в конце и вначале строк и оставляя между словами по одному пробелу
Помогите пожалуйста. Задание. Дан текстовый файл Т. Откорректировать его, удаляя пустые строки,...

Откорректировать файл, удаляя пустые строки, пробелы в конце и вначале строк и оставляя между словами по одному пробелу
Дан текстовый файл Т. Откорректировать его, удаляя пустые строки, пробелы в конце и вначале строк и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru