Another update from ingydotnet^djgoku
This commit is contained in:
parent
91df62d461
commit
948b86eafa
7604 changed files with 108452 additions and 22726 deletions
21
Task/Identity-matrix/PowerShell/identity-matrix-1.psh
Normal file
21
Task/Identity-matrix/PowerShell/identity-matrix-1.psh
Normal file
|
|
@ -0,0 +1,21 @@
|
|||
function id($n) {
|
||||
if($n -gt 0) {
|
||||
$array = @(1..$n | foreach{ @(0) })
|
||||
0..($n-1) | foreach{
|
||||
$i = $_
|
||||
$array[$i] = @(switch(0..($n-1)){
|
||||
$i {1}
|
||||
default {0}
|
||||
})
|
||||
}
|
||||
$array
|
||||
} else { @() }
|
||||
}
|
||||
function show($a) {
|
||||
if($a.Count -gt 0) {
|
||||
$n = $a.Count - 1
|
||||
0..$n | foreach{ "$($a[$_][0..$n])" }
|
||||
}
|
||||
}
|
||||
$array = id 4
|
||||
show $array
|
||||
2
Task/Identity-matrix/PowerShell/identity-matrix-2.psh
Normal file
2
Task/Identity-matrix/PowerShell/identity-matrix-2.psh
Normal file
|
|
@ -0,0 +1,2 @@
|
|||
$array[0][0]
|
||||
$array[0][1]
|
||||
Loading…
Add table
Add a link
Reference in a new issue