Лишние пробелы в строке

@Mr-Dr-Pr-Mart · Регистрация: 11.12.2018

Author24 — интернет-сервис помощи студентам

Всем доброго времени суток! Вот такая интересная задачка как для меня - новичка в программировании)
Можно использовать только тип данных CHAR и операторы: IF и цикл WHILE (кроме FOR)

Разработайте программу, которая удаляет пробелы в начале строки до первого не-пробела, в конце строки после последнего не-пробела и удаляет лишние (более одного) пробелы между словами.

Есть на работка. Только проблема в пробеле, после самого последнего символа в строке

@bormant · 11.12.2018, 12:52

Комментарий модератора

Вы, регистрируясь на форуме, пообещали следовать его правилам.
Дабы помочь в исполнении этого обещания, обращаю внимание, что правилами запрещается публикация текста/кода в виде картинок.

Ссылка на правила приложена, изучаем, впредь держим свое обещание.
Правила форума: https://www.cyberforum.ru/announcement.php?a=3

Для публикации кода используйте соответствующие языку теги (можно вставлять по кнопке в редакторе или руками вписать, разницы нет):
[PASCAL]
{ какой-то код }
begin
end.
[/PASCAL]
Это будет выглядеть вполне пристойно:

Pascal

1
2
3

{ какой-то код }
begin
end.

@bormant · 11.12.2018, 13:06

Будьте проще, и люди к вам потянутся:

не подсматривать без нужды...

может еще подумаете?

Pascal

var p, q: Char;
begin
  q:=' ';
  while not EoLn do begin
    p:=q; Read(q);
    if (q=' ') xor (p=' ') then Write(q);
  end; ReadLn;
end.

@Mr-Dr-Pr-Mart 0 / 0 / 0 Регистрация: 11.12.2018 Сообщений: 1
		1
	Лишние пробелы в строке 11.12.2018, 10:53. Показов 644. Ответов 2 Метки pascal abc, Задачка (Все метки) Всем доброго времени суток! Вот такая интересная задачка как для меня - новичка в программировании) Можно использовать только тип данных CHAR и операторы: IF и цикл WHILE (кроме FOR) Разработайте программу, которая удаляет пробелы в начале строки до первого не-пробела, в конце строки после последнего не-пробела и удаляет лишние (более одного) пробелы между словами. Есть на работка. Только проблема в пробеле, после самого последнего символа в строке 0

	11.12.2018, 13:06

Опции темы