diff options
Diffstat (limited to '1052/CH33/EX33.7/337.sce')
| -rwxr-xr-x | 1052/CH33/EX33.7/337.sce | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/1052/CH33/EX33.7/337.sce b/1052/CH33/EX33.7/337.sce new file mode 100755 index 000000000..cf4c1e150 --- /dev/null +++ b/1052/CH33/EX33.7/337.sce @@ -0,0 +1,10 @@ +clc;
+//Example 33.7
+//page no 531
+printf("Example 33.7 page no 531\n\n");
+//blood flowing through the arota
+D=2.5//diameter of arota
+S=%pi*D^2/4//cross sectional area,cm^2
+q=93.3//volumeric flow rate,cm^3/s
+v=q/S//flow velocity
+printf("\n flow velocity v=%f cm/s",v);
|