diff options
Diffstat (limited to '3864/CH8/EX8.3')
-rw-r--r-- | 3864/CH8/EX8.3/Ex8_3.sce | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/3864/CH8/EX8.3/Ex8_3.sce b/3864/CH8/EX8.3/Ex8_3.sce new file mode 100644 index 000000000..cf692919b --- /dev/null +++ b/3864/CH8/EX8.3/Ex8_3.sce @@ -0,0 +1,23 @@ +clear +// +// + +//Initilization of Variables + +d=750 //mm //Diameter of water supply pipes +h=50*10**3 //mm //Water head +sigma=20 //N/mm**2 //Permissible stress +rho=9810*10**-9 //N/mm**3 + +//Calculations + +//Pressure of water +P=rho*h //N/mm**2 + +//Stress +//sigma=p*d*(2*t)**-1 +//After further simplifying +t=P*d*(2*sigma)**-1 //mm + +//Result +printf("\n Thickness of seamless pipe is %0.3f mm",t) |