Pagini recente » Cod sursa (job #1377747) | Cod sursa (job #2644092) | Cod sursa (job #1918159) | Cod sursa (job #1481070) | Cod sursa (job #1488432)
#include <iostream>
#include <fstream>
using namespace std;
ifstream f ("pairs.in");
ofstream g ("pairs.out");
long n, i, v[100000], j, a, b, k, x, y, S;
int main()
{
f>>n;
for (i=0; i<n; i++)
f>>v[i];
for (i=0; i<n; i++)
for (j=i+1; j<n; j++)
{
if (v[i]!=v[j])
{
b=v[i];
a=v[j];
while (b)
{
x = a % b;
a = b;
b = x;
}
if (a==1)
k++;
}}
g<<k;
f.close();
g.close();
return 0;
}