1 files changed, 17 insertions, 0 deletions
diff --git a/3772/CH15/EX15.2/Ex15_2.sce b/3772/CH15/EX15.2/Ex15_2.sce
new file mode 100644
index 000000000..67ca56a2a
--- /dev/null
+++ b/3772/CH15/EX15.2/Ex15_2.sce
@@ -0,0 +1,17 @@
+// Problem no 15.2,Page no.352
+
+clc;clear;
+close;
+
+D=0.8 //m //iameter of water main
+h=100 //m //Pressure head
+w=10*10**3 //N/m**3 //Weight of Water
+sigma_t=20*10**6 //MPa //Permissible stress
+
+//Calculation
+
+p=w*h //N/m**2 //Pressure of inside the main
+t=p*D*(2*sigma_t)**-1*100 //m //Thcikness of metal
+
+//Result
+printf("The Thickness of metal is %.2f",t);printf(" cm")