Help for this page

Select Code to Download


  1. or download this
    #! /usr/bin/perl -w
    use warnings;
    ...
    print "\$matrixB = ", $matrixB,"<br>\n";
    print "\$matrixX = ", $matrixM->inv x $matrixB,"<br>\n";
    exit(0);
    
  2. or download this
    $matrixM =
    [ [ 1  2 -1 -1] 
    ...
    $matrixX =
    [ [         3] [         2]
      [         1] [         1]]
    
  3. or download this
    #! /usr/bin/perl -w
    use warnings;
    ...
    print "\$matrixB = ", $matrixB,"<br>\n";
    print "\$matrixX = ", $matrixM->inv x $matrixB,"<br>\n";
    exit(0);
    
  4. or download this
    $matrixM =[   [  [1 1] [2 1] ]    [ [ 1 -2] [ 2 -1] ]   ]
    $matrixB =[  [ 5  8] [10 -5] ]
    ...
      [  0  21] ]
     [ [ 5 -6]
      [ 0 -7] ] ]