´ð°¸£º
ßx“ñî}
|
1 |
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
10 |
|
D |
C |
A |
C |
D |
A |
A |
C |
D |
C |
|
11 |
12 |
13 |
14 |
15 |
16 |
17 |
18 |
19 |
20 |
|
D |
D |
A |
B |
B |
B |
A |
B |
C |
D |
|
21 |
22 |
23 |
24 |
25 |
26 |
27 |
28 |
29 |
30 |
|
B |
A |
D |
C |
D |
c |
A |
C |
B |
A |
Ìî¿Õî}
|
£¨1£© |
2 |
£¨2£© |
7 |
|
£¨3£© |
16 15 14 13 |
£¨4£© |
3 6 |
|
£¨5£© |
4 7 |
£¨6£© |
5 8 11 |
|
£¨7£© |
30 |
£¨8£© |
30 |
|
£¨9£© |
15 |
£¨10£© |
2 3 |
|
£¨11£© |
5 8 |
£¨12£© |
34 55 |
|
£¨13£© |
icBa |
£¨14£© |
baicBa |
|
£¨15£© |
baba |
£¨16£© |
st = "" |
|
£¨17£© |
(-1) ^ (i - 1) / Val(st)
»ò (-1) ^ (i + 1) / st |
£¨18£© |
if p=mid(st,i,1) then exit for |
|
£¨19£© |
CStr(i Mod 2) & h2b |
£¨20£© |
Right("0000" & h2b, 4) |
|
£¨21£© |
small & a(i) |
£¨22£© |
Mid(small, i, 1) <> "0" |
|
£¨23£© |
a(j) > a(j + 1) |
£¨24£© |
n As Long, a() As Integer
»ò ByVal n As Long, a() As Integer |
|
£¨25£© |
n \ 10 |
£¨26£© |
k = k + 1 |
|
£¨27£© |
ReDim Preserve a(k + 1) |
£¨28£© |
p = 0 |
|
£¨29£© |
a(i) = a(j) |
£¨30£© |
j = j + 1 |
|
