Pagini recente » Cod sursa (job #1138753) | Monitorul de evaluare | Cod sursa (job #223599) | Cod sursa (job #1925759) | Cod sursa (job #85742)
Cod sursa(job #85742)
program cifra;
{$APPTYPE CONSOLE}
uses
SysUtils;
var fin,fout:text;
i,j,n,ucifra,p,pp,ppp:longint;
begin
assign(fin,'cifra.in');
assign(fout,'cifra.out');
reset(fin);
rewrite(fout);
readln(fin,n);
ucifra:=0;
for i:=1 to n do
begin
readln(fin,p);
ppp:=p mod 10;
pp:=p mod 10;
for j:=2 to p do
begin
ppp:=pp*ppp;
ppp:=ppp mod 10;
end;
ucifra:=ucifra + ppp;
ucifra:=ucifra mod 10;
writeln(fout,ucifra);
end;
close(fout);
end.