Pagini recente » Cod sursa (job #2534139) | Cod sursa (job #2758099) | Cod sursa (job #261185) | Cod sursa (job #38630) | Cod sursa (job #110738)
Cod sursa(job #110738)
program cifra;
var s,t,a:int64;
n:array [1..30000] of int64;
f,g:text;
j,i,k:longint;
begin
assign(f,'cifra.in');
assign(g,'cifra.out');
reset(f);
rewrite(g);
readln(f,t);
for i:=1 to t do
readln(f,n[i]);
for i:=1 to n[i] do
begin
s:=0;
for j:=0 to i do
begin
a:=j;
for k:=1 to j-1 do
a:=a*j;
s:=s+a;
end;
writeln(g,s mod 10);
end;
close(f);
close(g);
end.