Advertisement
Guest User

Untitled

a guest
May 25th, 2015
221
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.51 KB | None | 0 0
  1. f[a0_, b0_] :=
  2. Module[{a = Abs[a0], b = LowerTriangularize[b0]},
  3. If[a0Koloni == b0Redici, Print[MatrixForm[a.b]],
  4. Print["Matricite nemozat da se mnozat!"]];]
  5. a0Redici = Input["Vnesi broj na redici na prvata matrica"]
  6. a0Koloni = Input["Vnesi broj na koloni"]
  7. a0 = Table[Input["Vnesi element:"], {i, a0Redici}, {j, a0Koloni}]
  8. b0Redici = Input["Vnesi broj na redici na vtorata matrica"]
  9. b0Koloni = Input["Vnesi broj na koloni"]
  10. b0 = Table[Input["Vnesi element:"], {i, b0Redici}, {j, b0Koloni}]
  11. f[a0, b0]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement