Cod sursa(job #17068)

Utilizator gabyboss29Gabi Munteanu gabyboss29 Data 14 februarie 2007 20:13:02
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
#include<iostream.h>
#include <fstream.h>
int main()
{ unsigned long j,i,k=1,n,a,b,r;
ifstream f("fractii.in");
f>>n;
for(i=1;i<=n;i++)
for(j=1;j<=n;j++)
{a=i;b=j;
if(a!=b)
{
while(b!=0)
 {r=a%b;
  a=b;
  b=r;}
if(a==1)
 k++;}}
ofstream g("fractii.out");
g<<k;
f.close();
g.close();
return 0;
}