w;char*p,a[2568];main(i){for(w=1002;p