Submission #3192059

---

Source Code Expand

var
 k:ansistring;
 i,w,n,e,s:longint;
begin
 read(k);
 for i:=1 to length(k) do
  begin
   if k[i]='W' then w:=1;
   if k[i]='N' then n:=1;
   if k[i]='E' then e:=1;
   if k[i]='S' then s:=1;
  end;
 if (((w=1) and (e=1)) and ((n=0) and (s=0))) or
    (((w=1) and (e=1)) and ((n=1) and (s=1))) or
    (((w=0) and (e=0)) and ((n=1) and (s=1))) or
    (((w=0) and (e=0)) and ((n=0) and (s=0))) then writeln('Yes')
                                              else writeln('No');
end.

Submission Info

Compile Error

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

Judge Result