var a:array[1..200000]of boolean;
n,x,i,j,p:longint;
s:int64;
f,g:text;
begin
assign(f,'sum.in');reset(f);
assign(g,'sum.out');rewrite(g);
readln(f,n);
for i:=1 to n do begin
readln(f,x);
for j:=1 to 2*x-1 do
a[j]:=true;
for j:=2 to 2*x-1 do
if (a[j]= true)and(x mod j=0) then
for p:=1 to (2*x-1)div j do
a[p*j]:=false;
for p:=1 to 2*x-1 do
if a[p]=true then s:=s+p;
writeln(g,s,' '); s:=0;
end;
close(f);close(g);end.