Cod sursa(job #69133)

Utilizator anna_bozianuBozianu Ana anna_bozianu Data 1 iulie 2007 14:00:58
Problema Sarpe Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.63 kb
#include<stdio.h>
#include<string.h>
char *nn;
int ln,i,j,m,n[2010],sol[2010];
int main()
{
	FILE *f,*g;
	f=fopen("sarpe.in","r");
	g=fopen("sarpe.out","w");
	nn=new char [1010];
	fscanf(f,"%s",&nn);
	ln=strlen(nn);
	for(i=0;i<ln;i++)
	n[i]=(int)(nn[ln-1-i]-'0');
	for(i=0;i<=ln;i++)
	for(j=0;j<=ln;j++)
	sol[i+j]+=(n[i]*n[j]);
	for(i=0;i<=ln;i++)
	sol[i]+=n[i];
	sol[0]+=2;
	for(i=0;i<=2005;i++)
	sol[i]*=2;
	for(i=0;i<=2005;i++)
	{sol[i+1]+=(sol[i]/10);
	 sol[i]%=10;
	}
	for(i=2005;i>=1;i--)
	if(sol[i]){ m=i;break;}
	for(i=m;i>=0;i--)
	fprintf(g,"%d",sol[i]);
	fprintf(g,"\n");
	fcloseall();
	return 0;
}