Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
лолkjk
28.02.2020 09:51 •
Информатика
Дана строка, содержащая слова, разделенные одним или несколькими пробелами. написать программу, заменяющую каждый пробел парой символов "! ? ". паскаль
Показать ответ
Ответ:
Govnomer228
07.10.2020 20:48
Var
s:string; i:integer;begin
readln(s);
while (pos(' ',s)<>0) do
begin
i:=pos(' ',s);
delete(s,i,1);
insert('!?',s,i);
end;
writeln(s);
readln;
end.
0,0
(0 оценок)
Ответ:
аоп777777777777
07.10.2020 20:48
// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString;
s:=s.Replace(' ','!?'); s.Println
end.
Пример
Мама мыла раму
Мама!?!?!?!?мыла!?раму
0,0
(0 оценок)
Популярные вопросы: Информатика
anastasia106444
20.10.2022 01:41
Упрощенное представление об объекте -A. МодельB. ОбъектC. 3d - моделированиеD. 3d - редактор...
Aleksandr541
30.03.2021 21:06
Программы приема и передачи данных в сетях А) Сетевые программы Б) Гостевые сервисы В) Сетевые черви Г) Блоги...
omka02
09.09.2021 23:58
Подсчитайте размер видеофрагмента длительностью 20 с, состоящего из отдельных JPEG-файлов размером в 1400 КБ каждый. Частоту смены кадров считайте равной 24 с–1. ответ в МБ...
nikgum
05.01.2022 10:13
В программе используется одномерный целочисленный массив aa с индексами от 00 до 99. Значения элементов равны 10; 15; 35; 35; 0; 5; 70; 100; 71; -1 соответственно, т.е. a[0] =...
alenaav08
04.01.2020 01:10
Напишите код программы в Python, который будет вычислять математическое уравнение и вычислит результат Y и Z (фото*)...
Виктория41116
11.01.2021 17:30
Какое количество информации содержит 3 часовой фильм Если один evocation через 0,5 ГБ информации за 1 секунду сменяется 24 кадра...
1AnGor1
03.01.2020 09:37
только не действия а именно скрипт...
armeninkrasavcheg
20.07.2020 15:33
1.Для хранения растрового изображения размером 226×226 пикселей отвели 8 КБ памяти. Каково максимально возможное число цветов в палитре изображения? 2.Сканируется цветное изображение...
KEKSIK13317
08.12.2022 17:59
с заданием по информатике выбери пропущенные команды линейного алгоритма для вычисления выражения(102+2x)*12+12прибавит 12прибавить 102ввод значения xумножить на 12увеличить x...
olya363
06.09.2022 15:46
Напишите программу на языке Pyhon по псевдокоду: алг произведение вещ а,РНачР:=1;а:=1;нцПока а =20Р:=P*а;а:=a+2;КЦвывод Ркон...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
s:string; i:integer;begin
readln(s);
while (pos(' ',s)<>0) do
begin
i:=pos(' ',s);
delete(s,i,1);
insert('!?',s,i);
end;
writeln(s);
readln;
end.
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString;
s:=s.Replace(' ','!?'); s.Println
end.
Пример
Мама мыла раму
Мама!?!?!?!?мыла!?раму