Cod sursa(job #2564074)

Utilizator VlaeriuUta Stefan Vlaeriu Data 1 martie 2020 17:30:59
Problema Pairs Scor 20
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.54 kb
#include <iostream>
#include <fstream>
using namespace std;
ifstream f("pairs.in");
ofstream g("pairs.out");
int n;
int v[100000];

void citire()
{
    f>>n;
    for(int i=1;i<=n;i++)
        f>>v[i];
}

int cmmdc(int a, int b)
{
    int c;
    while (b) {
        c = a % b;
        a = b;
        b = c;
    }
    return a;
}

int main()
{
    citire();
    int nr=0;
    for(int i=1;i<n;i++)
        for(int j=i+1;j<=n+1;j++)
        if(cmmdc(v[i],v[j])==1)
    {
        nr++;
    }
    g<<nr;
    return 0;
}