СТРОКИ

[boxxxer]

дана строка.определить сколько раз в нее входит группа букв "abc"
люди добрые помогите бедному студенту пожайлуста)

[Ybn2]

Какой язык программирования?

[unbanned]

program s;

var
  s: string;
  i, p: integer;

begin
  readln(s);
  p := 0;
  for i := 1 to length(s)-2 do 
    if copy(s, i, 3) = 'abc' then p := p + 1;
  writeln(p);
end.

паскаль...

[Stilet]

Ба! Знакомая задача: http://www.programmersforum.ru/showthread.php?t=121515

[boxxxer]

спасибо всем большое!