Cod sursa(job #65524)

Utilizator anna_bozianuBozianu Ana anna_bozianu Data 10 iunie 2007 16:50:34
Problema Divizori Primi Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.48 kb
#include<stdio.h>
long int i,j,ciur[1000001],sol[1000001][9],t,n,k;
int main()
{
	FILE *f,*g;
	f=fopen("divprim.in","r");
	g=fopen("divprim.out","w");
	for(i=2;i<=1000000;i++)
	 if(!ciur[i])
	  for(j=i;j<=1000000;j=j+i)
	   ciur[j]++;
	for(i=1;i<=1000000;i++)
	 {for(j=1;j<=8;j++)
	   sol[i][j]=sol[i-1][j];
	  sol[i][ciur[i]]=i;
	 }
	fscanf(f,"%ld",&t);
	for(i=1;i<=t;i++)
	{ fscanf(f,"%ld%ld",&n,&k);
	  fprintf(g,"%ld\n",sol[n][k]);
	}
	fcloseall();
	return 0;
}