Помогите решить задачу в паскале.Дана строка символов р1, р2, ..., рn. Определить число...

0 голосов
33 просмотров

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


Информатика (31 баллов) | 33 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
var
  str: string;
  sep: array of string := new string[1]('xyz');

begin
  readln(str); //str := 'xzyfffxyzffffffffffxyz 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.
(16.9k баллов)
0

не работает, пишет ожидался символ " [ " , где array

0

Установите тогда PascalABC.NET, он новый, более реалистичный и без этих заморочек...

0

а в старом Паскале работать будет, если ее изменить?