Pagini recente » Cod sursa (job #2622363) | Cod sursa (job #1012868) | Atasamentele paginii Evo | Monitorul de evaluare | Cod sursa (job #432143)
Cod sursa(job #432143)
var f,g : text;
t : -1..30002;
n, i, s2 : longint;
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;
end;
s1:=s1 mod 10;
writeln(g,s1);
end;
close(g);
close(f);
end.