//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)