Submission #2979513

---

Source Code Expand

var
  i:longint;
  st:string;
 begin
   readln(st);
   for i:=length(st) downto 1 do
   if st[i]='F' then
   if (pos('C',st)<>0) and (pos('F',st)<>0) and (pos('C',st)<i) then
   begin
     writeln('Yes');
     halt;
   end;
   writeln('No'); 
 end.

Submission Info

Compile Error

/usr/bin/ld.bfd: warning: ./link.res contains output sections; did you forget -T?

Judge Result