Cod sursa(job #499462)

Utilizator rock4evermarius rock4ever Data 9 noiembrie 2010 20:20:24
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
#include<iostream.h> 
#include<fstream.h> 
long n,i,p=0,j,q,a,b; 
long t(int a,int b){     
while(a!=b){if(a>b)a=a-b; 
        
if(a<b)b=b-a;} return a;} 
    
 
int main(){ 
    
ifstream f("fractii.in"); 
    
ofstream g("fractii.out"); 
    
f>>n; 
   
for(i=2;i<=n;i++)        
for(j=2;j<=n;j++) 
  
if(t(i,j)==1)p++; 
    
   
g<<p+(2*n)-1;}