Blatt6_MWII1.html

with(linalg); -1 

 

Blatt 6 

Aufgabe 3 

`:=`(A, matrix(3, 3, [0, .2, .2, .4, .2, .4, .2, .4, 0])); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1), `-`(A)))); 1; `:=`(d, vector(3, [36000, 1200000, 0])); 1; linsolve(EminusA, d); 1; gausselim(Eminus...
`:=`(A, matrix(3, 3, [0, .2, .2, .4, .2, .4, .2, .4, 0])); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1), `-`(A)))); 1; `:=`(d, vector(3, [36000, 1200000, 0])); 1; linsolve(EminusA, d); 1; gausselim(Eminus...
`:=`(A, matrix(3, 3, [0, .2, .2, .4, .2, .4, .2, .4, 0])); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1), `-`(A)))); 1; `:=`(d, vector(3, [36000, 1200000, 0])); 1; linsolve(EminusA, d); 1; gausselim(Eminus...
`:=`(A, matrix(3, 3, [0, .2, .2, .4, .2, .4, .2, .4, 0])); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1), `-`(A)))); 1; `:=`(d, vector(3, [36000, 1200000, 0])); 1; linsolve(EminusA, d); 1; gausselim(Eminus...
`:=`(A, matrix(3, 3, [0, .2, .2, .4, .2, .4, .2, .4, 0])); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1), `-`(A)))); 1; `:=`(d, vector(3, [36000, 1200000, 0])); 1; linsolve(EminusA, d); 1; gausselim(Eminus...
 

 

 

 

 

array( 1 .. 3, 1 .. 3, [( 3, 1 ) = .2, ( 2, 1 ) = .4, ( 3, 2 ) = .4, ( 3, 3 ) = 0, ( 2, 3 ) = .4, ( 2, 2 ) = .2, ( 1, 2 ) = .2, ( 1, 3 ) = .2, ( 1, 1 ) = 0 ] )
array( 1 .. 3, 1 .. 3, [( 3, 1 ) = -.2, ( 2, 1 ) = -.4, ( 3, 2 ) = -.4, ( 3, 3 ) = 1, ( 2, 3 ) = -.4, ( 2, 2 ) = .8, ( 1, 2 ) = -.2, ( 1, 3 ) = -.2, ( 1, 1 ) = 1 ] )
array( 1 .. 3, [( 1 ) = 36000, ( 2 ) = 1200000, ( 3 ) = 0 ] )
array( 1 .. 3, [( 1 ) = 748000.0003, ( 2 ) = 2436000.000, ( 3 ) = 1124000.000 ] )
array( 1 .. 3, 1 .. 3, [( 3, 1 ) = 0, ( 2, 1 ) = 0, ( 3, 2 ) = 0, ( 3, 3 ) = .6666666667, ( 2, 3 ) = -.4800000000, ( 2, 2 ) = .7200000000, ( 1, 2 ) = -.2, ( 1, 3 ) = -.2, ( 1, 1 ) = 1. ] )(1.1.1)
 

 

Aufgabe 4 

`:=`(A, evalm(`+`(`*`(.1, `*`(matrix(5, 5, [1, 2, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 2, 1, 1, 0, 0, 0, 2])))))); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1, 1, 1), `-`(A)))); -1; `:=`(d, vec...
`:=`(A, evalm(`+`(`*`(.1, `*`(matrix(5, 5, [1, 2, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 2, 1, 1, 0, 0, 0, 2])))))); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1, 1, 1), `-`(A)))); -1; `:=`(d, vec...
`:=`(A, evalm(`+`(`*`(.1, `*`(matrix(5, 5, [1, 2, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 2, 1, 1, 0, 0, 0, 2])))))); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1, 1, 1), `-`(A)))); -1; `:=`(d, vec...
`:=`(A, evalm(`+`(`*`(.1, `*`(matrix(5, 5, [1, 2, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 2, 1, 1, 0, 0, 0, 2])))))); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1, 1, 1), `-`(A)))); -1; `:=`(d, vec...
`:=`(A, evalm(`+`(`*`(.1, `*`(matrix(5, 5, [1, 2, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 2, 1, 1, 0, 0, 0, 2])))))); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1, 1, 1), `-`(A)))); -1; `:=`(d, vec...
`:=`(A, evalm(`+`(`*`(.1, `*`(matrix(5, 5, [1, 2, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 2, 1, 1, 0, 0, 0, 2])))))); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1, 1, 1), `-`(A)))); -1; `:=`(d, vec...
`:=`(A, evalm(`+`(`*`(.1, `*`(matrix(5, 5, [1, 2, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 2, 1, 1, 0, 0, 0, 2])))))); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1, 1, 1), `-`(A)))); -1; `:=`(d, vec...
`:=`(A, evalm(`+`(`*`(.1, `*`(matrix(5, 5, [1, 2, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 2, 1, 1, 0, 0, 0, 2])))))); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1, 1, 1), `-`(A)))); -1; `:=`(d, vec...
`:=`(A, evalm(`+`(`*`(.1, `*`(matrix(5, 5, [1, 2, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 2, 1, 1, 0, 0, 0, 2])))))); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1, 1, 1), `-`(A)))); -1; `:=`(d, vec...
`:=`(A, evalm(`+`(`*`(.1, `*`(matrix(5, 5, [1, 2, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 2, 1, 1, 0, 0, 0, 2])))))); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1, 1, 1), `-`(A)))); -1; `:=`(d, vec...
`:=`(A, evalm(`+`(`*`(.1, `*`(matrix(5, 5, [1, 2, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 2, 1, 1, 0, 0, 0, 2])))))); 1; `:=`(EminusA, evalm(`+`(diag(1, 1, 1, 1, 1), `-`(A)))); -1; `:=`(d, vec...
 

 

 

 

 

 

Matrix(%id = 61601276)
wahre Lösung:
Vector[row](%id = 103258216)
Vector[row](%id = 87342908)
Vector[row](%id = 101896760)
x(1.2.1)