Pagini recente » Cod sursa (job #156933) | Cod sursa (job #2591853) | Cod sursa (job #1731241) | Cod sursa (job #1490302) | Cod sursa (job #57776)
Cod sursa(job #57776)
program radu;
var n,t,r,m:integer;
f,g:text;
cif1,cif2:char;
cod:integer;
begin
assign (f,'cifra.in');
reset (f);
assign (g,'cifra.out');
rewrite (g);
read(f,t);
readln(f);
for r:=1 to t do
begin
cif1:='0';
cif2:='0';
while not eoln(f) do
begin
cif1:=cif2;
read (f,cif2);
end;
readln(f);
val(cif1,n,cod);
val(cif2,m,cod);
n:=n*10+m;
case n of
1: n:=1;
2: n:=5;
3: n:=2;
4: n:=8;
5: n:=3;
6: n:=9;
7: n:=2;
8: n:=8;
9: n:=7;
10: n:=7;
11: n:=8;
12: n:=4;
13: n:=7;
14: n:=3;
15: n:=8;
16: n:=4;
17: n:=1;
18: n:=5;
19: n:=4;
20: n:=4;
21: n:=5;
22: n:=9;
23: n:=6;
24: n:=2;
25: n:=7;
26: n:=3;
27: n:=6;
28: n:=2;
29: n:=1;
30: n:=1;
31: n:=2;
32: n:=8;
33: n:=1;
34: n:=7;
35: n:=2;
36: n:=8;
37: n:=5;
38: n:=9;
39: n:=8;
40: n:=8;
41: n:=9;
42: n:=3;
43: n:=0;
44: n:=6;
45: n:=1;
46: n:=7;
47: n:=0;
48: n:=6;
49: n:=5;
50: n:=5;
51: n:=6;
52: n:=2;
53: n:=5;
54: n:=1;
55: n:=6;
56: n:=2;
57: n:=9;
58: n:=3;
59: n:=2;
60: n:=2;
61: n:=3;
62: n:=7;
63: n:=4;
64: n:=0;
65: n:=5;
66: n:=1;
67: n:=4;
68: n:=0;
69: n:=9;
70: n:=9;
71: n:=0;
72: n:=6;
73: n:=9;
74: n:=5;
75: n:=0;
76: n:=6;
77: n:=3;
78: n:=7;
79: n:=6;
80: n:=6;
81: n:=7;
82: n:=1;
83: n:=8;
84: n:=4;
85: n:=9;
86: n:=5;
87: n:=8;
88: n:=4;
89: n:=3;
90: n:=3;
91: n:=4;
92: n:=0;
93: n:=3;
94: n:=9;
95: n:=4;
96: n:=0;
97: n:=7;
98: n:=1;
99: n:=0;
0: n:=0;
end;
writeln (g,n);
end;
close (f);
close (g);
end.