Cod sursa(job #499452)

Utilizator rock4evermarius rock4ever Data 9 noiembrie 2010 20:05:11
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.3 kb
Raporteaza aceasta sursa 
#include<iostream.h>
#include<fstream.h>
long n,i,p=0,j,q,a,b;
int 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;}