Pagini recente » Monitorul de evaluare | Cod sursa (job #704973) | Cod sursa (job #1704028) | Cod sursa (job #58485) | Cod sursa (job #706111)
Cod sursa(job #706111)
var f,g:text;
t,n,i,j,k,s:longint;
x:array[1..30000] of integer;
begin
assign(f,'cifra.in');
reset(f);
assign(g,'cifra.out');
rewrite(g);
readln(f,t);
for i:=1 to t do begin
readln(f,n);
k:=1;
s:=0;
for j:=1 to n do
k:=k*n;
x[i]:=k;
end;
for i:=1 to t do begin
for j:=1 to i do
s:=s+x[j];
writeln(g,s mod 10);
s:=0;
end;
close(g);
end.