8 lines
85 B
APL
8 lines
85 B
APL
|
ID←{∘.=⍨⍳⍵}
|
|||
|
|
ID 5
|
|||
|
|
1 0 0 0 0
|
|||
|
|
0 1 0 0 0
|
|||
|
|
0 0 1 0 0
|
|||
|
|
0 0 0 1 0
|
|||
|
|
0 0 0 0 1
|