Pagini recente » Cod sursa (job #1299612) | Cod sursa (job #1238741) | Cod sursa (job #2266680) | Cod sursa (job #1331944) | Cod sursa (job #264576)
Cod sursa(job #264576)
program Cifra;
var f,x:text;
t:word;
n,i,j,c:longint;
p:longint;
uf:byte;
Begin
assign(f,'cifra.in'); reset(f);
assign(x,'cifra.out'); rewrite(x);
readln(f,t);
for i:=1 to t do begin
readln(f,n);
uf:=0;
for j:=1 to n do begin
p:=1;
for c:=1 to j do begin
p:=p*j;
p:=p mod 10; end;
uf:=(uf+p mod 10) mod 10;
end;
writeln(x,uf);
end;
close(f); close(x);
end.