Дана строка символов заменить в данной строке все последовательности из…

Question

63

Дана строка символов заменить в данной строке все последовательности из одинаковых символов длиной более двух символов на строку вида: '^nc', гдеn-количество повторений заменяемого символа, с-сам символ. Например: дана строка 'aaabccdddde' и она должна стать строкой вида: '^3abcc^4de'

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

svhost · Accepted Answer

41

svhost

22 августа 2022

Var s, res: string; k, i, j: integer; c: char; begin read (s); s: =s+chr (10); for i: =1 to length (s) do if s[i]=c then k: =k+1 else begin if k <= 2 then for j: =1 to k do res: =res+c else res: =res+'^'+inttostr (k)+c; c: =s[i]; k: =1; end; writeln (res); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: