Cod sursa(job #2827467)
Utilizator | Ionut Birescu IonutB56 | Data | 5 ianuarie 2022 19:23:20 |
---|---|---|---|
Problema | Pairs | Scor | 0 |
Compilator | cpp-64 | Status | done |
Runda | Arhiva de probleme | Marime | 0.5 kb |
#include<iostream>
#include<fstream>
using namespace std;
ifstream f("pairs.in");
ofstream g("pairs.out");
long long n, a[101], x, y,i, c,j,s,v[101],viz[101];
int prim(long n, long m)
{
while (m != 0)
{
int r = n % m;
n = m;
m = r;
}
return n;
}
int main()
{
f >> n;
for (i = 1; i <= n; i++)
f >> a[i];
for(i=1; i<n; i++)
for(j=i+1; j<=n; j++)
if(i!=j && prim(a[i],a[j])==1)
s++;
g<<s;
}