Cod sursa(job #1324765)

Utilizator Darius15Darius Pop Darius15 Data 22 ianuarie 2015 19:27:55
Problema Indep Scor 5
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.5 kb
#include <fstream>

using namespace std;
ifstream f("indep.in");
ofstream g("indep.out");
int cmmdc(int x,int y)
{
    int r;
    do
    {
        r=x%y;
        x=y;
        y=r;
    }
    while(r);
    return x;
}
long long n,i,a[501],sir[1001],j,o;

int main()
{
    f>>n;
    for (i=1;i<=n;i++)
        f>>a[i];
    sir[a[1]]=1;
    for (i=2;i<=n;i++)
       for (j=1;j<=1000;j++)
       {o=cmmdc(a[i],j);
        sir[o]+=sir[j];
       }
    g<<sir[1];
    return 0;
}