summaryrefslogtreecommitdiff
path: root/3886/CH3/EX3.13/Ex3_13.sce
blob: e539d11291ac497a4db1736a2c26532cfd1c57c4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Reactions at supports C and D
//Refer fig.3.24(a),(b)&(c)
//applying equilibrium conditions for roller
R2=2000/cosd(30)  //N
//consider equilibrium of bar CD
//Taking moment about C
RD=((800*2.5*cosd(30))+(R2*2))/(5*cosd(30))  //N
VC=800+R2*cosd(30)-RD  //N
HC=R2*sind(30)  //N
printf("The reactions are:-\nRD=%.1f N\nHC=%.1f N",RD,HC)