DouKaku?beta

Comment detail

アルファベットの繰り上がり (Nested Flatten) 
cmd.exeで。
>abc
A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z,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,BB,BC,BD,BE,BF,BG,BH,BI,BJ,BK,BL,BM,BN,BO,BP,BQ,BR,BS,BT,BU,BV,BW,BX,BY,BZ,CA,CB,CC,CD,CE,CF,CG,CH,CI,CJ,CK,CL,CM,CN,CO,CP,CQ,CR,CS,CT,CU,CV

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
@echo off
setlocal enabledelayedexpansion
set abc=A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
set k=
set l=
set n=0
set m=100
for %%i in (%abc%) do (
  for %%j in (%abc%) do (
    set l=!l!,!k!%%j
    set /a n=n+1
    if "!n!" == "%m%" goto end
  )
  set k=%%i
)
:end
echo %l:~1%

Index

Feed

Other

Link

Pathtraq

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