main(l,x,w){char s[9];while(gets(s)){for(x=l=w=0;w<5;)x=s[w]