while 1:
 s=raw_input();i=x=0
 while-1<i<len(s):x+=1;i+=x*(ord(s[i])-61)
 print+(i>0)