Дана строка, содержащая не более двадцати латинских букв. все вхождение «max» в ней заменить на «min» и «макс» на «мин». подсчитать число таких замен

212

359

Посмотреть ответы 2

Ответы на вопрос:

viva32

Информатика

4,7(1 оценок)

Uses crt; var i,zi,zj: integer; s,n: string; begin clrscr; repeat writeln('введите строку не больше 20 символов.'); readln(s); until length(s) < =20; for i: =1 to length(s) do begin if (s[i] = 'm') or (s[i]='м') then begin n: =copy(s,i,3); if n = 'max' then begin n: ='min'; delete(s,i,3); insert(n,s,i); zi: =zi+1; end else begin n: =copy(s,i,4); if n = 'макс' then begin n: ='мин'; delete(s,i,4); insert(n,s,i); zj: =zj+1; end; end; end; end; if (zi < > 0) or (zj < > 0) then writeln('в строке заменено ',zi,'раз. слово "max". а слово "макс" ',zj,' раз.')else writeln('в строке не найдено совпадений для '); writeln; writeln(s); readkey; end.

kristos24052006

Информатика

4,4(23 оценок)

var

k,n, i: integer;

begin

write('k = '); readln(k);

write('n = '); readln(n);

for i : = 1 to n do

writeln(k);

end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.