Pagini recente » Cod sursa (job #2195761) | Cod sursa (job #1313509) | Cod sursa (job #26439) | Cod sursa (job #719881) | Cod sursa (job #109287)
Cod sursa(job #109287)
#include <stdio.h>
FILE *f=fopen("pairs.in","r");
FILE *g=fopen("pairs.out","w");
long n,m[100000],k;
void citeste(){
fscanf(f,"%ld",&n);
for(int i=1;i<=n;i++) fscanf(f,"%ld",&m[i]);
}
int cmmdc(long a,long b){
long r;
do{
r=a%b;
a=b;
b=r;
}
while (b!=0);
if(a==1) return 1;
return 0;
}
int main(){
citeste();
for(int i=1;i<n;i++){
for(int j=i+1;j<=n;j++){
if(cmmdc(m[i],m[j])) k++;
}
}
fprintf(g,"%ld",k);
return 0;
}