diff options
Diffstat (limited to '2159/CH7/EX7.5')
-rwxr-xr-x | 2159/CH7/EX7.5/75.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/2159/CH7/EX7.5/75.sce b/2159/CH7/EX7.5/75.sce new file mode 100755 index 000000000..152a40091 --- /dev/null +++ b/2159/CH7/EX7.5/75.sce @@ -0,0 +1,12 @@ +// problem 7.5
+b=9
+i=1/3000
+d=1.2
+w=b+d
+A=(w+b)*0.5*d
+P=b+2*((d*d+d*d*0.25)^0.5)
+m=A/P
+C=50
+V=C*((m*i)^0.5)
+Q=V*A
+disp(Q*1000,V,"average velocity of flow, rate of flow")
|