Cod sursa(job #154671)
Utilizator | Data | 11 martie 2008 13:04:21 | |
---|---|---|---|
Problema | Fractii | Scor | 0 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.36 kb |
#include <fstream.h>
int prime(int a, int b) {
while (a!=b) {
if (a>b) (a=a-b);
else (b=b-a);
}
if (a==1) return 1;
else return 0;
}
void main () {
int n,x,k,i,j;
fstream f1("fractii.in",ios::in);
fstream f2("fractii.out",ios::out);
x=1;
f1>>n;
for (i=1;i<=n;i++)
for (j=1;j<=n;j++)
if (i!=j&&prime(i,j)==1) x=x+1;
f2<<x;
}