Cod sursa(job #198877)

Utilizator blackwofl15paul calburean blackwofl15 Data 15 iulie 2008 17:48:52
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.56 kb
#include<fstream.h>
#include<conio.h>
void main()
{struct fr {int a,b,k;};int i=0;clrscr();
fr c[1000];
int l,x;cout<<"x=";
int j;ifstream f("fractii.in"); ofstream g("fractii.out");f>>x;
l=1;
for(i=0;i<(x*x);i++)
{c[i].a=l;
if((i+1)%x==0)
      l++;
  } l=0;
for(i=0;i<(x*x);i++)
{ l++;c[i].k=0;
     c[i].b=l;if(l==x){l=0;}}


for(i=2;i<=x;i++)
  for(j=0;j<(x*x);j++)
    if(c[j].k==0)
     {if(c[j].b%i==0&&c[j].a%i==0)
	 c[j].k=1;
     }

int sum=0;
for(i=0;i<(x*x);i++)
    if(c[i].k==0)
       sum++;
g<<sum;f.close();g.close();


}