Pagini recente » Cod sursa (job #2361392) | Cod sursa (job #547583) | Cod sursa (job #818625) | Cod sursa (job #1367972) | Cod sursa (job #353062)
Cod sursa(job #353062)
program p7646;
var f,g:text;t,r,q:longint;
v:array[1..50000]of longint;
function cifra(m:longint):longint;
var s,p,i,j:longint;
begin
s:=1;p:=0;
for i:=1 to m do begin
s:=i;
for j:=1 to i-1 do
s:=s*i;
p:=p+s;end;cifra:=p mod 10;end;
begin
assign(f,'cifra.in');reset(f);
assign(g,'cifra.out');rewrite(g);
readln(f,t);
for q:=1 to t do begin readln(f,v[q]);
r:=cifra(v[q]);writeln(g,r); end;
close(f);close(g);
end.