Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/8: Рейтинг темы: голосов - 8, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 05.12.2015
Сообщений: 87

Выделить в строке символ пробелами слева и справа

13.12.2015, 16:05. Показов 1730. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дана стартовая строка. Найти в ней символ, который вводится пользователем с клавиатуры, и отделить этот символ в стартовой строке пробелами слева и справа.
Спасибо за внимание!
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
13.12.2015, 16:05
Ответы с готовыми решениями:

Выделить пробелами заданный символ в строке
Как можно выделить пробелами заданый символ в строке символов, что бы не повредить рядом стоящие символы. То есть найти в строке нужные...

Выделить из строки подстроки из согласных букв, у которых и справа и слева стоят гласные буквы
Дана строка из английских слов. Выделить из строки подстроки из согласных букв, у которых и справа и слева стоят гласные буквы. Вывести...

Переставить в строке символы попарно слева и справа
Переставить в строке символы попарно слева и справа (1..n, 2..n-1 и т.д.);

2
37 / 37 / 72
Регистрация: 31.10.2014
Сообщений: 206
13.12.2015, 16:20
Лучший ответ Сообщение было отмечено Loggos как решение

Решение

Loggos,
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Var s : string;
    c : char;
    i : integer;
begin
Writeln('Enter string');
Readln(s);
Writeln('Enter char');
Readln(c);
i:=1;
While (i<=length(s)) do
      begin
      If (s[i]=c) then
         begin
         Insert(#32, s, i);
         Insert(#32, s, i+2);
         i:=i+2;
         end else i:=i+1;
      end;
Writeln('New string');
Writeln(s);
Readln;
end.
1
0 / 0 / 0
Регистрация: 05.12.2015
Сообщений: 87
13.12.2015, 16:44  [ТС]
Спасибо большое!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
13.12.2015, 16:44
Помогаю со студенческими работами здесь

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

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

В строке ListBox выделить первый символ
Подскажите пожалуйста, можно ли в строке ListBox выделить первый символ? Например S-&gt;ASdsds вывести S

Определить количество элементов матрицы у которых слева в его строке находятся элементы меньше его,а справа больше
Задана матрица размером NxM. Определить количество элементов матрицы у которых слева в его строке находятся элементы меньше его,а справа...

Программа справа налево перемещает по указанной строке экрана один символ изменяя его цвет
Ребят, выручайте=((( В этот раз вот такая про..блема, на всеми любимом паскале. программа, которая непрерывно справа налево перемещает по...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
YAFU@home — распределённые вычисления для математики. На CPU
Programma_Boinc 20.01.2026
YAFU@home — распределённые вычисления для математики. На CPU YAFU@home — это BOINC-проект, который занимается факторизацией больших чисел и исследованием aliquot-последовательностей. Звучит. . .
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит: токи, напряжения и их 1 и 2 производные при t = 0;. . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru