diff options
Diffstat (limited to '1586/CH14/EX14.1')
| -rw-r--r-- | 1586/CH14/EX14.1/EXP14_1.jpg | bin | 0 -> 212491 bytes | |||
| -rw-r--r-- | 1586/CH14/EX14.1/EXP14_1.sce | 16 |
2 files changed, 16 insertions, 0 deletions
diff --git a/1586/CH14/EX14.1/EXP14_1.jpg b/1586/CH14/EX14.1/EXP14_1.jpg Binary files differnew file mode 100644 index 000000000..b7b5d7b5b --- /dev/null +++ b/1586/CH14/EX14.1/EXP14_1.jpg diff --git a/1586/CH14/EX14.1/EXP14_1.sce b/1586/CH14/EX14.1/EXP14_1.sce new file mode 100644 index 000000000..da9fc5f0f --- /dev/null +++ b/1586/CH14/EX14.1/EXP14_1.sce @@ -0,0 +1,16 @@ +clc;funcprot(0);//EXAMPLE 14.1
+// Initialisation of Variables
+d1=0.5;..........//Diameter of a steel Cable in in.
+rhoy=70000;........//Yield Strength of Steel Cable in psi
+rhoa1=36000;........//Yield Strength of Aluminum in psi
+rhos=0.284;..........//Density of Steel in lb/in^3
+rhoa2=0.097;.........//Density of Aluminum in lb/in^3
+//CALCULATIONS
+F=rhoy*((%pi/4)*(d1^2));........//Load applied on Aluminum in lb
+d2=sqrt((F/rhoa1)*(4/(%pi)));.......//Diameter of Aluminum in in.
+Ws=(%pi/4)*(d1^2)*12*rhos;..........//Weight of Steel in lb/ft
+Wa=(%pi/4)*(d2^2)*12*rhoa2;..........//Weight of Aluminum in lb/ft
+disp(F,"a. Load applied on Aluminum in lb:")
+disp(d2,"b. Diameter of Aluminum in in.: ")
+disp(Ws,"c. Weight of Steel in lb/ft:")
+disp(Wa,"Weight of Aluminum in lb/ft:")
|
