Rosetta Code

Matrix multiplication: Difference between revisions

Page Discussion

Matrix multiplication (view source)

Revision as of 18:41, 7 September 2019

58 bytes removed ,  4 years ago
m
→‎{{header|PowerShell}}
m (→‎{{header|BASIC}}: - put full basic in subsection)
Line 3,567:
<lang PowerShell>
function multarrays($a, $b) {
$n,$m,$p = ($a.Count - 1), ($b.Count - 1), ($b[0].Count - 1)
$c = @()
if ($a[0].Count -andne $b.Count) {throw "Multiplication impossible"}
$nc = @(0)*($ab.count - 1Count)
foreach ($mi =in $b[0].count.$n) { - 1
$c[$i] = @foreach ($j in 0)*(..$n+1p) {
foreach ($i in 0.. $n) { sum = 0
$c[$i] = foreach ($jk in 0..$m) {$sum += $a[$i][$k]*$b[$k][$j]}
$sum = 0
foreach ($k in 0..$n){$sum += $a[$i][$k]*$b[$k][$j]}
$sum
}
}
}
$c
}
 
function show($a) { $a | foreach{"$_"}}
if($a) {
 
0..($a.count - 1) | foreach{ if($a[$_]){"$($a[$_])"}else{""} }
}
}
$a = @(@(1,2),@(3,4))
$b = @(@(5,6),@(7,8))
Blek
678

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/49200"