Cod sursa(job #602215)
| Utilizator | Data | 9 iulie 2011 19:52:12 | |
|---|---|---|---|
| Problema | Cifra | Scor | 0 |
| Compilator | fpc | Status | done |
| Runda | Arhiva de probleme | Marime | 0.51 kb |
program cifra;
const s2: string ='0152839287784738415445962736211281728598893061706556251629322374051409906950637667184958433403940710';
var t,i,x,code:integer;
s1:string;
fi,fo:text;
begin
assign(fi,'cifra.in');
reset(fi);
assign(fo,'cifra.out');
rewrite(fo);
readln(fi,t);
for i:=1 to t do begin
readln(fi,s1);
val(copy(s1,length(s1)-1,2),x,code);
writeln(fo,s2[x]);
end;
close(fo);
end.