DouKaku?beta

Comment detail

アルファベットの繰り上がり (Nested Flatten)

This comment is reply for 3916 dankogai: これまたOne-Linerで。 ＃...(アルファベットの繰り上がり). Go to thread root. 

すみません。修正前バグ付きのバージョンをコピペしちゃったみたいです(Aの処理)。正解はこちら。
Dan the Man to Err
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
% perl -le \
'print do{$z=$s="";do{$s=("A".."Z")[$_%26-($z++?1:0)].$s}while($_=int($_/26));$s}for 0..(shift)-1' \
100 | grep A
A
AA
AB
AC
AD
AE
AF
AG
AH
AI
AJ
AK
AL
AM
AN
AO
AP
AQ
AR
AS
AT
AU
AV
AW
AX
AY
AZ
BA
CA

Index

Feed

Other

Link

Pathtraq

loading...
Creative Commons License このサイトの内容は、 クリエイティブ・コモンズ・ライセンスの下でライセンスされています。 [詳細]