Submission #3604077

---

Source Code Expand

var
    s:string;
    i,j,k:longint;
    b:boolean;
begin
    readln(s);
    b:=false;
    for i:=1 to length(s) do
    begin
        if(not(b))and(s[i]='C')then
        b:=not(b);
        if(b)and(s[i]='F')then
        begin
            writeln('Yes');
            exit;
        end;
    end;
    writeln('No');
end.

Submission Info

Compile Error

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

Judge Result