5 lines
60 B
Text
5 lines
60 B
Text
|
Func Identity(n)=Array id[n,n];[id]:=[1].
|
||
|
|
|
||
|
|
Identity(7)
|
||
|
|
[id]
|