program sum;
{$APPTYPE CONSOLE}
uses
  SysUtils;

var fin,fout:text;
    i,j,n,m,t,q,s:longint;
{*-----------------------------*}
function prim(a,b:longint):boolean;
begin
        prim:=true;
        for q:=2 to trunc(sqrt(a)) do
        Begin
                if ((q mod a = 0 ) and (q mod b = 0)) then
                Begin
                        prim:=false;
                        Break;
                End;
        End;
end;
{*---------------MAIN----------*}
begin
        assign(fin,'sum.in'); reset(fin);
        assign(fout,'sum.out'); rewrite(fout);
        readln(fin,t);
        for J:=1 to T do
        Begin
                Readln(fin,n);
                s:=0;
                for i:=1 to 2*N do
                Begin
                        If Prim(i,n) then S:=S+i;
                End;
                writeln(fout,s);
        End;
        close(fin);
        close(fout);
end.