summaryrefslogtreecommitdiff
path: root/3772/CH8/EX8.4/Ex8_4.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3772/CH8/EX8.4/Ex8_4.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3772/CH8/EX8.4/Ex8_4.sce')
-rw-r--r--3772/CH8/EX8.4/Ex8_4.sce35
1 files changed, 35 insertions, 0 deletions
diff --git a/3772/CH8/EX8.4/Ex8_4.sce b/3772/CH8/EX8.4/Ex8_4.sce
new file mode 100644
index 000000000..239803ffd
--- /dev/null
+++ b/3772/CH8/EX8.4/Ex8_4.sce
@@ -0,0 +1,35 @@
+// Problem 8.4,Page no.209
+
+clc;clear;
+close;
+
+G=80 //GPa //Modulus of rigidity
+P=1 //KN //Load
+dell=10 //cm //Deflection
+sigma_s=350 //MPa //Max shear stress
+rho=78000 //N/m**3 //Density of materials
+
+//Calculations
+
+U=P*1000*dell*10**-2*2**-1 //N*m //Energy stored
+
+//Again U=sigma_s**2*V*(4*G)**-1
+//After substituting values in above equation and further simplifying we get
+V=50*4*80*10**9*((350*10**6)**2)**-1 //m**3 //Volume
+
+W=V*rho //N //Weight
+
+//Now T=P*R=%pi*d**3*sigma_s*16**-1
+//After substituting values in above equation and further simplifying
+D=(10**6*16*(2*%pi*350*10**6)**-1)**0.5*10**2 //cm //Mean diameter of coil
+
+k=P*10**3*(dell*10**-2)**-1 //stiffness
+
+//Also k=D*n**-1*10**6
+//After substituting values in above equation and further simplifying
+n=10**6*D*10**-2*k**-1 //number of turns
+
+//Result
+printf("The Value of weight is %.3f N",W)
+printf("\n Mean coil diameter is %.2f",D);printf(" cm")
+printf("\n The number of Turns is %.d",ceil(n))