Cod sursa(job #29351)
Utilizator | Data | 9 martie 2007 09:18:53 | |
---|---|---|---|
Problema | Fractii | Scor | 0 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.47 kb |
#include<fstream.h>
#include<conio.h>
int main()
{
clrscr();
long slasktratt,i,j,k,a,z;
ifstream f("fractii.in");
ofstream g("fractii.out");
f>>a;
slasktratt=0;
for (i=1;i<=a;i++)
{
for (j=1;j<=a;j++)
{
z=1;
for (k=2;k<=i;k++)
{
if ((i%k==0)&&(j%k==0)) {z=0;break;}
//cout<<i<<" "<<j<<" "<<z<<endl;
}
for (k=2;k<=i;k++)
{
if ((i%k==0)&&(j%k==0)) {z=0;break;}
}
if (z) slasktratt++;
}
}
g<<slasktratt;
f.close();
g.close();
return 0;
}