Pagini recente » Borderou de evaluare (job #421946) | Borderou de evaluare (job #2079780) | Borderou de evaluare (job #919974) | Cod sursa (job #2454017) | Cod sursa (job #2501206)
#include <fstream>
#include <iostream>
#define NMAX 100000
using namespace std;
ifstream f("pairs.in");
ofstream g("pairs.out");
int n, sol, v[NMAX+10];
int cmmdc(int a, int b)
{
if(!b) return a;
return cmmdc(b, a%b);
}
int main()
{
f >> n;
for(int i=1; i<=n; i++) f >> v[i];
for(int i=1; i<n; i++)
for(int j=i+1; j<=n; j++) if(cmmdc(v[i], v[j]) == 1) sol++;
g << sol << '\n';
return 0;
}