summaryrefslogtreecommitdiff
path: root/3886/CH8/EX8.2/8_2.sce
blob: c1d5c8f5cc445e8f52aba15fbcc6a293b996f895 (plain)
1
2
3
4
5
6
7
//Reactions developed in beam
//refer fig 8.6
//Let RA and RB be the reactions at supports A and B
//applying virtual work principle
RB=(20/3)+(80/3)  //kN
RA=(40/3)+(40/3)  //kN
printf("Reactions are-\nRA=%.2f kN\nRB=%.2f kN",RA,RB)