Cod sursa(job #3186281)

Utilizator Padurariu_RiccardoPadurariu Riccardo Padurariu_Riccardo Data 22 decembrie 2023 15:50:18
Problema Pairs Scor 20
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.58 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){
        if(a>b)
            a-=b;
        else
            b-=a;
    }
    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;
}