Cod sursa(job #3186282)

Utilizator Padurariu_RiccardoPadurariu Riccardo Padurariu_Riccardo Data 22 decembrie 2023 15:51:37
Problema Pairs Scor 0
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.56 kb
#include <iostream>
#include <fstream>
using namespace std;

ifstream fin("pairs.in");
ofstream fout("pairs.out");

bool cmmdc(int a,int b){

    while(a!=b){
        int r=a%b;
        a=b;
        b=r;
    }
    if(a==1)
        return true;
    else
        return false;
}

int main(){

    int a[100001],N,i,C=0;
    fin >> N;
    for(i=1;i<=N;i++)
        fin >> a[i];
    for(i=1;i<=N;i++){
        for(int j=i+1;j<=N;j++){
            if(cmmdc(a[i],a[j]))
                C++;
        }
    }
    fout << C;
    return 0;
}