Ввести предложения и вывести слова

[Andrey0072]

Ввести предложения , вывести и подсчитать слова что начинаются на "св".
Я пробовал с таким условием не получилось.

if (str == 'св');

[newerow1989]

var s:string;
    i,c:integer;
begin
   Write('s = '); Readln(s);
   Writeln(s);
   s:=' '+s;
   c:=0;
   For i:=1 to Length(s)-2 do
      If Copy(s,i,3)=' св'  then
         Inc(c);
   Writeln(c);
   Readln;
end.

[Andrey0072]

Та мне на C++ нужно