Pagini recente » Cod sursa (job #2303191) | Cod sursa (job #529190) | Cod sursa (job #933011) | Cod sursa (job #349690) | Cod sursa (job #413111)
Cod sursa(job #413111)
var j,t:integer; n:word; f,g:text;
function ex(x:word):int64;
var ret:int64; i:word;
begin
ret:=x;
for i:=2 to x do
ret:=(ret*x) MOD 10;
ex:=ret;
end;
function sf(x:word):int64;
var s:int64;i:word;
begin
s:=1;
for i:=2 to x do
s:=(s+ex(i))MOD 10;
sf:=s;
end;
begin
assign(f,'cifra.in');reset(F);
assign(g,'cifra.out');rewrite(g);
readln(f,t);
for j:=1 to t do
begin
readln(f,n);
writeln(g,sf(n) MOD 10);
end;
close(f);
close(g);
end.