Cod sursa(job #2010869)

Utilizator Rodik_RodyRodica Vasilescu Rodik_Rody Data 14 august 2017 17:23:17
Problema Pairs Scor 0
Compilator c Status done
Runda Arhiva de probleme Marime 0.92 kb
#include <stdio.h>
#include <stdlib.h>
#define in "pairs.in"
#define out "pairs.out"
#define MAX 2000000
char ciur[MAX];
int n, v[100001], nr;
int cmmdc(a,b){
    int r;
    while(b!=0){
        r=a%b;
        a=b;
        b=r;
    }
    return a;
}
int main()
{

    freopen(in, "r", stdin);
    freopen(out, "w", stdout);
    scanf("%d",&n);
    int i, j;
    ciur[0]=ciur[1]=1;
     for ( i = 2; i*i <= 100000; i++){
        if( ciur[i] == 0)
            for(j= i*i; j<= 1000000; j +=i)
                ciur[j] = 1;
    }
    for (i = 1; i <= n; i++)
        scanf("%d",&v[i]);
    for (i = 1; i < n; i++){
        if(ciur[v[i]]==0){
            for(j = i+1; j <=n; j ++)
                if(v[j]%v[i]!=0)
                    nr++;
        }
        else
        for(j = i+1; j <=n; j ++)
            if(cmmdc(v[i],v[j])==1)
                nr++;
    }
    printf("%d",nr);


    return 0;
}