Pagini recente » Cod sursa (job #1321804) | Cod sursa (job #1958594) | Cod sursa (job #76228) | Cod sursa (job #1108901) | Cod sursa (job #507877)
Cod sursa(job #507877)
program cifra;
var t,s,i,j,x,aux,cop,k:word;
f,g:text;
begin
assign (f,'cifra.in'); reset (f);
assign (g,'cifra.out'); rewrite (g);
read (f,t);
for i:=1 to t do begin readln (f,x);
s:=0;
for j:=1 to x do begin cop:=j; aux:=1;
for k:=1 to j do aux:=(aux*cop) mod 10;
s:=s+aux;
end;
writeln (g,s mod 10);
end;
close (f);
close (g);
end.