Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
НастяСонная
12.01.2023 04:17 •
Информатика
Найти в строке указанную подстроку и заменить ее на новую. ее на новую. строку, ее подстроку для замены и новую подстроку вводит пользователь.
Показать ответ
Ответ:
дарина25864
14.08.2020 13:57
Var s,ss,s2:string;
i:longint;
Begin
write('String: ');
readln(s);
write('Substring: ');
readln(ss);
Write('Replace with: ');
readln(s2);
i:=pos(ss,s);
delete(s,i,length(ss));
insert(s2,s,i);
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Масяня878
09.08.2021 12:00
Упростите логические выражения. Правильность упрощения проверьте с таблиц истинности для исходных и полученных логических формул. a) A v (НЕ(А)&.В); б) А &(НЕ(A) v В); в)...
Lizakisa777
12.05.2020 13:26
Ақпараттық қауіпсіздіктің бұзылуына әсер ету мүмкін табиғи қауіп-қатер...
paul1905
21.07.2021 14:23
По питону 2 плеез20 1) написать программу вычисляющую значение выражения: y=2x^2-7/22) определить является ли заданное в программе число четным и принадлежащим диапазону от 1 до100...
АняМур123
20.02.2022 09:39
Волан де Морт спрятал один из крестражей в золотой рыбке. Эта рыбка живёт в пяти озёрах, соединённых между собой рекой. Озёра пронумерованы числами от 1 до 5, из озера 1 можно попасть...
elyakhina1976
10.06.2021 02:26
2. между ввода и вывода впишите в алгоритм несколько команд присваивания, в результате чего должен получиться алгоритм возведения в 4-ю степень введённого числа (дополнительные переменные,...
Гений1611
15.04.2023 23:36
Из 2 капитанов выписать 3 предложения с наречиями...
Andezia
06.04.2023 22:38
625. берылген ондык болшек кандай екы коршылес наиурал сандапдын ...
Saidusa
20.08.2020 16:22
Найдите отношение 63/3 4/20...
letsplei1212
06.07.2022 02:30
У магазині обслужили за день Н (N-200) покупців, кожен з яких витратив на покупки не більше за К (К 500) гривень. Визначити денний прибуток магазину і середню суму споживчого чека....
mechta771
27.02.2022 07:40
Зависимая территории в Южной Европе?9 букв,6 буква Л ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i:longint;
Begin
write('String: ');
readln(s);
write('Substring: ');
readln(ss);
Write('Replace with: ');
readln(s2);
i:=pos(ss,s);
delete(s,i,length(ss));
insert(s2,s,i);
writeln(s);
end.