diff options
Diffstat (limited to '3648/CH9/EX9.7/Ex9_7.sce')
| -rw-r--r-- | 3648/CH9/EX9.7/Ex9_7.sce | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/3648/CH9/EX9.7/Ex9_7.sce b/3648/CH9/EX9.7/Ex9_7.sce new file mode 100644 index 000000000..e5ba1d34f --- /dev/null +++ b/3648/CH9/EX9.7/Ex9_7.sce @@ -0,0 +1,7 @@ +//Example 9_7
+clc();
+clear;
+//To find out by what factor the blood flow in an artery is reduced
+r1_r2=1/2 //The ratio by which the radius is altered in arterys
+R1_R2=1/r1_r2^4 //Ratio by which flow is altered
+printf("The flow rate is reduced by a factor of %d",R1_R2)
|