Решить в паскале.дана строка символов р1, р2, рn. - вопрос №277776312 от ktlwfh 05.09.2021 21:42

Question

Информатика: Решить в паскале.дана строка символов р1, р2, рn. определить число вхождений в последовательность группы букв xyz . вырезать фрагмент из текста между первым и вторым вхождением группы символов xyz .

ktlwfh · Answer

var
str: string;
sep: array of string := new string[1]('xyz');

begin
readln(str); //str := 'xzyfffxyzxyz xyzvv';
writeln(str.Split(sep, System.StringSplitOptions.None).Length - 1, ' вхождений');
writeln(str.Remove(str.IndexOf(sep[0]) + 3, str.LastIndexOf(sep[0]) - str.IndexOf(sep[0]) - 3));
end.