あみだくじ
Posted feedbacks - なでしこ
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 | あみだ="A B C D E
| | |-| |
|-| | |-|
| |-| |-|
|-| |-| |
|-| | | |"
Amida=あみだ
AmidaFooter=Amida[0]を" "で区切る
Amidaの0を配列削除
Iで0から(Amidaの要素数)-1まで繰り返す
AmidaLine = Amida[I]
// 処理しやすいように整形
AmidaLineの1から1バイト削除
AmidaLineから1バイト右端削除
AmidaLine = AmidaLineを"|"で区切る
Jで0から(AmidaLineの要素数)-1まで繰り返す
もし(AmidaLine[J]="-")ならば
AmidaFooter = AmidaFooterのJを(J+1)に配列入替え
あみだ&改行&(AmidaFooterを" "で配列結合)を表示
●配列入替え(ArrayのAをBに)
tmpAとは文字列=Array[A]
tmpBとは文字列=Array[B]
Array[A]=tmpB
Array[B]=tmpA
Arrayで戻る
|

greentea #4476() Rating4/6=0.67
[ reply ]