summaryrefslogtreecommitdiff
path: root/3782/CH1/EX1.23/Ex1_23.sce
blob: ecf6d49d37db75d02dc60739c7bcb845fea91ba0 (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

//ch-1  page -40,41  pb-2

//

//


a=257
b=156
c=103


t1=acos((a*a+b*b-(c*c))/(2*a*b))
t1=t1*(180/%pi)

dg1=int(t1)
mi1=t1-int(t1)
mi1=(mi1*60)
printf("\n theta1= %0.3f degrees %0.3f minutes",dg1,mi1)


t2=acos((c*c+b*b-(a*a))/(2*c*b))
t2=t2*(180/%pi)
dg=int(t2)
mi=t2-int(t2)
mi=(mi*60)
printf("\n theta2= %0.3f degrees %0.3f minutes",dg,mi)