summaryrefslogtreecommitdiff
path: root/3782/CH9/EX9.4/Ex9_4.sce
blob: f6a49af3032a83056266c53d06f17e1d3e7d9318 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29

//ch-9 page 307   pb-4
//

//

l1=75.5,l2=80.25,l3=75,

t1=30.25,t2=40.5,t3=60.5,



L1=l1*cos(t1*(%pi/180))
L2=-l2*cos(t2*(%pi/180))
L3=-l3*cos(t3*(%pi/180))
printf("\n latitudes of AQ,QR,RB are %0.3f %0.3f %0.3f",L1,L2,L3)


D1=l1*sin(t1*(%pi/180))
D2=l2*sin(t2*(%pi/180))
D3=-l3*sin(t3*(%pi/180))
printf("\n Depature of AQ,QR,RB are %0.3f %0.3f %0.3f",D1,D2,D3)

L4=-(L1+L2+L3)
D4=-(D1+D2+D3)

l4=sqrt(L4*L4+(D4*D4))

printf("\n length of AB= %0.3f meters',l4)