diff options
Diffstat (limited to '3782/CH9/EX9.3/Ex9_3.sce')
-rw-r--r-- | 3782/CH9/EX9.3/Ex9_3.sce | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/3782/CH9/EX9.3/Ex9_3.sce b/3782/CH9/EX9.3/Ex9_3.sce new file mode 100644 index 000000000..3c714e0b3 --- /dev/null +++ b/3782/CH9/EX9.3/Ex9_3.sce @@ -0,0 +1,36 @@ + +//ch-9 page 305 pb-3 +// + +// + +l1=100.5,l3=75,l4=50.5, + +t1=30.5,t2=45,t3=40.5,t4=60,t5=40.25, + + + +L1=l1*cos(t1*(%pi/180)) +L3=-l3*cos(t3*(%pi/180)) +L4=-l4*cos(t4*(%pi/180)) + +printf("\n latitude of AB,CD,DE are %0.3f %0.3f %0.3f",L1,L3,L4) +D1=l1*sin(t1*(%pi/180)) +D3=-l3*sin(t3*(%pi/180)) +D4=-l4*sin(t4*(%pi/180)) +printf("\n Depature of AB,CD,DE are %0.3f %0.3f %0.3f",D1,D3,D4) + +L2_L5=-(L1+L3+L4) +D2_D5=-(D1+D3+D4) +printf("\n L2_L5,D2_D5") + +k=0.117 +l5=(L2_L5+D2_D5)/(k) + +k1=0.763 + +l2=(k1*l5)-L2_L5 +l2=l2/0.707 + +printf("\n length of BC= %0.3f ",l2) +printf("\n length of EA= %0.3f ",l5) |