いろんな言語で宿題 第四編 at TECH
[2ch|▼Menu]
24:デフォルトの名無しさん
10/03/13 05:21:03
>>20
使用言語:J

rank=: monad define
SIZE=.|.{(;(<: # y), 2)$ 2#}.- >: i. # y
MAT=. SIZE {. L:0 y
(#y) - {. I. 1e_10 < | ;(-/ . * L:0 MAT)
)

rank 4 5$0 0 0 0 0,0 0 2 0 0,0 1 0 1 1,0 4 3 4 0
3


次ページ
続きを表示
1を表示
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
暇つぶし2ch

5499日前に更新/23 KB
担当:undef