| ||||||||||
| Online Judge | Problem Set | Authors | Online Contests | User | ||||||
|---|---|---|---|---|---|---|---|---|---|---|
| Web Board Home Page F.A.Qs Statistical Charts | Current Contest Past Contests Scheduled Contests Award Contest | |||||||||
Re:不知为何,就是WA,请指教In Reply To:Re:不知为何,就是WA,请指教 Posted by:wtswu at 2011-03-06 10:13:50 var
s:ansistring;
procedure change(n:longint);
begin
delete(s,n,3);
insert('me',s,n);
end;
begin
while not eof do begin
readln(s);
while pos('you',s)<>0 do
change(pos('you',s));
writeln(s);
end;
end.
Followed by: Post your reply here: |
All Rights Reserved 2003-2013 Ying Fuchen,Xu Pengcheng,Xie Di
Any problem, Please Contact Administrator