Pagini recente » Cod sursa (job #1101953) | Cod sursa (job #2474013) | Cod sursa (job #2251417) | Cod sursa (job #525387) | Cod sursa (job #2818730)
#include<iostream>
#include<fstream>
#include<vector>
using namespace std;
ifstream f("pairs.in");
ofstream g("pairs.out");
long long n, a[101], x, y,i, c,j,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 = 1; j <= n; j++)
if (a[i] != a[j] && prim(a[i], a[j]) == 1)
{
c++;
}
}
g << c / 2;
}