Pagini recente » Cod sursa (job #2461916) | Cod sursa (job #2559250) | Cod sursa (job #3268737) | Cod sursa (job #1178160) | Cod sursa (job #432178)
Cod sursa(job #432178)
var f,g : text;
t : -1..30002;
n, i, s2 : word;
s1 : byte;
begin
assign(f,'cifra.in');
assign(g,'cifra.out');
rewrite(g);
reset(f);
readln(f,t);
for t:=1 to t do begin readln(f,n);
s1:=0;
for n:=1 to n do begin s2:=1;
for i:=1 to n do begin s2:=s2*n;
s2:=s2 mod 10;
end;
s1:=s1+s2;
s1:=s1 mod 10;
end;
writeln(g,s1);
end;
close(g);
close(f);
end.