[過去ログ]
プログラミングのお題スレ Part13 (1002レス)
上
下
前
次
1-
新
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
713
: 2019/03/16(土)14:50
ID:0dLFyPZP(1/3)
調
AA×
>>681
[
240
|320|
480
|
600
|
100%
|
JPG
|
べ
|
レス栞
|
レス消
]
713: [sage] 2019/03/16(土) 14:50:17.74 ID:0dLFyPZP >>681 Perl5 use feature say; $n = 0; @t = ('木'); say "n=$n\n$t[0]"; for $n (1..2) { $l = '-' x 2**($n-1); @u = map{$l . $_ . $l} @t; @w = map{$t[$_].$t[$_]} 0..$#t; @t = (@u, @w); say "n=$n"; say for @t; } 実行例 ~ $ perl 13_681.pl n=0 木 n=1 -木- 木木 n=2 ---木--- --木木-- -木--木- 木木木木 注) 正直者には、-はスペースに見えます。 http://mevius.5ch.net/test/read.cgi/tech/1549160513/713
木 実行例 木 木 木木 木 木木 木木 木木木木 注 正直者にははスペースに見えます
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 289 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
ぬこの手
ぬこTOP
0.029s