Pagini recente » Rezultate Info Oltenia 2018 Proba pe Echipe | Cod sursa (job #2015442) | Cod sursa (job #3137046) | Cod sursa (job #2538814) | Cod sursa (job #40948)
Cod sursa(job #40948)
#include <fstream.h>
inline long int cmmdc(int a,int b){
int c; if(a<b){c=a;a=b;b=c;}
do{c=a%b;a=b;b=c;}while(c);return a;
}
int main(){
ifstream f("sum.in");
ofstream g("sum.out");
long int x,s,i,n,j;
f>>n;
for(j=1; j<=n; j++){f>>x;s=0;
if(x%2==0){for(i=1; i<=2*x; i+=2)if(cmmdc(x,i)==1)s+=i;}
else{for(i=1; i<=2*x; i++)if(cmmdc(x,i)==1)s+=i;}
g<<s<<'\n';}
}