Взаданной фразе после каждой буквы «о» вставить сочетание введенное с клавиатуры. или найдите как изменить эту программу, в ней сочетание пишется только после первой буквы, хотя если словосочетание будет из одной буквы то программа нормально работает. program pony; vark,a,b: string; i: integer; begin write('введите строку'); readln(a); write('введите сочетание'); readln(b); k: =copy (b,1,length (b)); for i: =1 to length (a) do begin if a[i]='о' then insert(k,a,i+1); end; writeln(a); end.
129
206
Ответы на вопрос:
Program pony; var a, b: string; i: integer; begin write('введите строку: '); readln(a); write('введите сочетание: '); readln(b); for i : = length(a) downto 1 do if a[i] = 'о' then insert(b, a, i + 1); writeln(a) end. тестовое решение: введите строку: дает корова молоко введите сочетание: 12345 дает ко12345ро12345ва мо12345ло12345ко12345
Pascalabc.net скорее всего криво и нерационально, но работает var s,s2,a : string; l,i,b,l2 : integer; begin readln (s); l : = length(s); while b < > -1 do begin b : = 0; b : = pos ('o',s); if b < > 0 then begin s2 : = s2 + copy(s,1,b); delete (s,1,b); writeln ('введите строку'); readln (a); s2 : = s2+a; end else begin l2 : = length(s); s2 : = s2 + copy(s,1,l2); b : = -1; end; end; writeln (s2); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Sashka171203.09.2022 10:15
-
KitKat32145609.05.2020 13:23
-
arina123801.05.2022 00:25
-
alexandrshinkarenko18.08.2022 06:39
-
Alisarerete12.04.2021 17:47
-
vladyakovlev2218.12.2021 21:06
-
vika1612200401.06.2021 18:07
-
nika34424533502.05.2022 22:38
-
Нюра95918.07.2022 19:10
-
azharik2k1714.03.2021 20:51
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.