Cod sursa(job #88153)

Utilizator pandaemonAndrei Popescu pandaemon Data 30 septembrie 2007 16:19:17
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.29 kb
Raporteaza aceasta sursa 
#include <iostream.h>
#include <fstream.h>

fstream in("fractii.in",ios::in),out("fractii.out",ios::out);

long n,i,j,d,sol;

int main()
{in>>n; sol=n*2-1;

for(i=2;i<=n;i++)
for(j=i+1;j<=n;j++)
{
for(d=2;d<=i;d++)
if(i%d==0 && j%d==0) break;

if(d==i+1) sol+=2;
}
out<<sol;}