Pagini recente » Cod sursa (job #2247333) | Cod sursa (job #1910439) | Cod sursa (job #2247251) | Cod sursa (job #289317) | Cod sursa (job #248833)
Cod sursa(job #248833)
#include <iostream.h>
#include <fstream.h>
int main()
{ int i,j,a,b,k=0,r,n;
long long m[10000];
fstream f("pairs.in",ios::in);
f>>n;
for(i=1;i<n;i++)
{ f>>m[1];
for(j=i+1;j<=n;j++)
{ f>>m[j];
a=m[i];
b=m[j];
while(b!=0)
{ r=a%b;
a=b;
b=r; }
if(a==1)
k++; } }
fstream g("pairs.out",ios::out);
g<<k;
g.close();
f.close();
return 0; }