3782/CH1/EX1.12/Ex1_12.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

clear
//ch-1 page-33, pb-12
//


x=(380.0285/2.5754)

PA=x
AQ=367-x
al=180-(36.45+86.55)
bt=86.35-40-35

TA=AQ*tan(46*(%pi/180))

printf("\n width of river is  %0.3f meters',TA)