diff options
Diffstat (limited to '797/CH3/EX3.3.s/3_03_solution.sce')
-rw-r--r-- | 797/CH3/EX3.3.s/3_03_solution.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/797/CH3/EX3.3.s/3_03_solution.sce b/797/CH3/EX3.3.s/3_03_solution.sce new file mode 100644 index 000000000..9e76c0cdb --- /dev/null +++ b/797/CH3/EX3.3.s/3_03_solution.sce @@ -0,0 +1,13 @@ +//Soultion 3-03 +WD=get_absolute_file_path('3_03_solution.sce'); +datafile=WD+filesep()+'3_03_example.sci'; +clc; +exec(datafile) +//(a) +P_gauge1 = rho * g * h_bottle1; //Basic Pressure formula +P_gauge1 = P_gauge1 / 1000; //conversion from [Pa] to [kPa] +printf("Gauge pressure of blood is %1.2f kPa", P_gauge1); +//(b) +P_gauge2 = P_gauge2 * 1000; +h_bottle2 = P_gauge2 / (rho * g); +printf("\nHeight required for maintaining 20kPa pressure is %1.2f m", h_bottle2); |