удаление К-го символа. с++

[parovoz121]

1. Дано число k и предложение. Напишите программу, удаляющую из всех слов предложения k-ую букву.



Примечания:
Размер строки задать константным выражением, а затем использовать при работе со строкой. Число символов в строке может быть очень большим.
При необходимости считывания строки непосредственно с клавиатуры воспользоваться форматированным вводом.
После считывания строк вывести их значения на экран.
помогите пожалуйста

[baster128]

Си не использую, поэтому пример на Делфи

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Label1: TLabel;
    Label2: TLabel;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  const
  MyStr:string='asdf lskdfj ssjfel slefjs l lksje fslkjs';

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
function DelK(k:integer;PrStr:string):string;
var i,v:integer;
begin v:=0;
for i:=0 to Length(PrStr)-1 do
if PrStr[i]<>' 'then begin
inc(v);
if v=k then begin
Delete(PrStr,i,1);
DelK:=PrStr
end end else
v:=0;
end;
begin
Label2.Caption:=DelK(3,label1.Caption);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
label1.Caption:=MyStr
end;

end.

[parovoz121]

а на с++ может кто нить написать?