summaryrefslogtreecommitdiff
path: root/3825/CH7/EX7.8/Ex7_8.sce
blob: 7ed2c5bad2c27411b4a90f5c38caf73c793f1f6c (plain)
1
2
3
4
5
6
7
8
9
10
11
clc
Q=[1 1;(1/4) (1/3)]//matrix for (A),(B) LHS
R=[1500;(2500/6)] //matrix for (A),(B),RHS
S=inv(Q)*R//solving equation A and B
Q2=S(1,1)
Q3=S(2,1)
mprintf("Q2=%fkJ\n",Q2)
mprintf("Q3=%ikJ\n",Q3)