summaryrefslogtreecommitdiff
path: root/3864/CH9/EX9.1/Ex9_1.sce
blob: aaad4d9c69c58aade7eb3397856147ddacf01bb4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
clear
//
//

//Initilization of Variables
L=5000 //mm //Length of strut
dell=10 //mm //Deflection
W=10 //N //Load

//Calculations

//Central Deflection of a simply supported beam with central concentrated load is
//dell=W*L**3*(48*E*I)**-1 

//Let E*I=X
X=W*L**3*(48*dell)**-1 //mm

//Euler's Load
//Let Euler's Load be P
P=%pi**2*X*(L**2)**-1

//Result
printf("\n Critical Load of Bar is %0.2f  N",P)