Дан одномерный массив, который содержит не более 60 символов, которые образуют слова, разделенные пробелом. заменить слово «mama» на слово «ded». написать программу в паскале abc. заранее !
101
304
Ответы на вопрос:
//pascalabc.net 3.2 сборка 1318 var s: array[1..60] of char; i,j,len: integer; begin len: =60; for i: =1 to 60 do read(s[i]); i: =1; while(i< =len-3) do begin if (s[i]='m') and (s[i+1]='a') and (s[i+2]='m') and (s[i+3]='a') then begin s[i]: ='d'; s[i+1]: ='e'; s[i+2]: ='d'; for j: =i+3 to len-1 do s[j]: =s[j+1]; dec(len); end; inc(i); end; for i: =1 to len do write(s[i]); end.
Программа с массивом (хотя он тут и не нужен): var a: array[1..60] of char; st: string; i,p: integer; begin writeln('введите массив символов: '); readln(st); writeln('вот массив: '); for i: =1 to length(st) do begin a[i]: =st[i]; write(a[i]); end; writeln; st: =' '+st+' '; p: =pos(' mama ',st); while p> 0 do begin delete(st,p,6); insert(' ded ',st,p); p: =pos(' mama ',st); end; writeln('измененный массив: '); for i: =1 to length(st)-2 do begin a[i]: =st[i+1]; write(a[i]); end; writeln; end. пример: введите массив символов: mama papa okno mama primer baba вот массив: mama papa okno mama primer baba измененный массив: ded papa okno ded primer baba
на один символ отводится 1 байт 30 строк по 70 символов - 2100 символов 5 страниц-это 10500 символов так что ответ 10500 байт
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
7гогого7896шол12.05.2023 23:51
-
alekseyanci09.08.2021 07:31
-
BTS111111y27.01.2023 14:58
-
Maximismailov28107.01.2020 14:45
-
Юма12329.11.2022 01:26
-
Vikaa111117.10.2020 00:12
-
darinaprokopenk23.10.2021 19:01
-
ArkhamCity04.04.2022 05:46
-
vany418904.02.2023 15:42
-
makhastiirisba24.02.2023 13:13
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.