Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
0 / 0 / 0
Регистрация: 11.01.2012
Сообщений: 16
1

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

11.01.2012, 15:01. Просмотров 1400. Ответов 2
Метки нет (Все метки)

Дана строка-предложение с избыточными пробелами между словами.
Преобразовать ее так, чтобы между словами был ровно один пробел.срочно и с объяснениями
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.01.2012, 15:01
Ответы с готовыми решениями:

Дана строка-предложение, содержащая избыточные пробелы. Преобразовать ее так, чтобы между словами был ровно один пробел
Дана строка-предложение, содержащая избыточные пробелы. Преобразовать ее так, чтобы между словами...

Написать функцию, возвращающую строку в которой между словами ровно один пробел
помогите пожалуйста в составление программы на паскале задания: 1.Дано предложение.Слова в...

Преобразовать строку так, чтобы между словами был ровно один пробел
Дана строка-предложение с избыточными пробелами между словами. Преобразовать ее так, чтобы между...

Преобразовать строку так, чтобы между словами был ровно один пробел
При реализации программы необходимо использовать функции обработки строк из библиотек stdlib.h и...

2
Модератор
62515 / 46699 / 32186
Регистрация: 18.05.2008
Сообщений: 112,997
11.01.2012, 16:03 2
Лучший ответ Сообщение было отмечено марина царева как решение

Решение

Алгоритм
Pascal
1
2
while pos('  ',s)>0 do//пока в строке есть 2 пробела рядом, (в апострофах 2 пробела)
delete(s,pos('  ',s),1);//1 пробел удаляем.
Все остальное делайте сами, или учитесь или заказывайте решения зо оплату, а халявы уже хватит.
0
3 / 3 / 3
Регистрация: 03.12.2011
Сообщений: 55
15.01.2012, 23:19 3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  S : String;
  i, Len : Integer;
begin
  Writeln('Zadaite stroky');
  Readln(S);
  Len := Length(S);
  for i := Len downto 2 do begin
    if (S[i - 1] = ' ') and (S[i] = ' ') then Delete(S, i, 1);
  end;
  Writeln('Result:');
  Writeln(S);
  Readln;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.01.2012, 23:19

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Преобразовать строку так, чтобы между словами был ровно один пробел
Дана строка-предложение с избыточными пробелами между словами. Преобразовать ее так, чтобы между...

Переобразовать строку так, чтобы между словами был ровно один пробел
Дана строка-предложение с избыточными пробелами между словами.Переобразовать её так, чтобы между...

Дана строка-предложение, содержащая избыточные пробелы. Преобразовать ее так, чтобы между словами был ровно один пробел.
Дана строка-предложение, содержащая избыточные пробелы. Преобразовать ее так, чтобы между словами...

Отредактировать текст так, чтобы между словами был ровно один пробел
помогите решить задачу. Дан произвольный текст.Отредактировать его так,чтобы: а)Между словами...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.