POJ 2635 The Embarrassed Cryptographer

//Time 907ms, Memory 4480K

#include<iostream>
#include<string>
using namespace std;
int vis[1000010],prime[80000];
int main()
{
	int i,j,k=0,l,a[35],t;
	char s[105];
	memset(vis,0,sizeof(vis));
	memset(s,0,sizeof(s));
	for(i=2;i*i<1000010;i++) if(!vis[i])
	{
		for(j=i*i;j<1000010;j+=i) vis[j]=1;
	}
	for(i=2;i<1000010;i++) if(!vis[i])
		prime[k++]=i;
	while(cin>>s>>l && ((strlen(s)!=1 || s[0]!='0') || l))
	{
		j=0;i=strlen(s);
		for(i--;;i-=3)
		{
			if(i==-1) break;
			else if(i==0)
			{
				a[j++]=s[i]-48;break;
			}
			else if(i==1)
			{
				a[j++]=(s[i-1]-48)*10+s[i]-48;break;
			}
			else a[j++]=(s[i-2]-48)*100+(s[i-1]-48)*10+s[i]-48;
		}
		for(i=0;prime[i]<l;i++)
		{
			t=0;
			for(k=j-1;k>=0;k--)
				t=(t*1000+a[k])%prime[i];
			if(!t) break;
		}
		if(prime[i]<l) cout<<"BAD "<<prime[i]<<endl;
		else cout<<"GOOD"<<endl;
		memset(s,0,sizeof(s));
	}
	return 0;
}