summaryrefslogtreecommitdiff
path: root/104/CH2/EX2.17/2_17.sce
blob: 581de2719fa784b7f6609c3f1bf45100feb8e5cc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//multiplication of matrices
A=[3 -1;0 1;2 0]
B=[1 0 -1;2 1 0]
C=size(A)
D=size(B)
if C(1,2)==D(1,1) then
    AB=A*B
    disp(AB,"AB=")
else 
    disp("matrices  are not conformable for multiplication AB")
end
if D(1,2)==C(1,1) then
    BA=B*A
    disp(BA,"BA=")
else 
    disp("matrices  are not conformable for multiplication BA")
end