```cpp
var st,st1:string; s,s2,i:longint;
begin
readln(st);
readln(st1);
s:=1;
s2:=1;
for i:=1 to length(st) do s:=s*(ord(st[i])-64);
for i:=1 to length(st1) do s2:=s2*(ord(st1[i])-64);
if s mod 47=s2 mod 47 then writeln('GO') else writeln('STAY');
end.
```
by 唐三少 @ 2016-02-01 10:59:11