diff options
Diffstat (limited to '797/CH3/EX3.6.s/3_06_solution.sce')
| -rw-r--r-- | 797/CH3/EX3.6.s/3_06_solution.sce | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/797/CH3/EX3.6.s/3_06_solution.sce b/797/CH3/EX3.6.s/3_06_solution.sce new file mode 100644 index 000000000..9869f186e --- /dev/null +++ b/797/CH3/EX3.6.s/3_06_solution.sce @@ -0,0 +1,10 @@ +//Soultion 3-06 +WD=get_absolute_file_path('3_06_solution.sce'); +datafile=WD+filesep()+'3_06_example.sci'; +clc; +exec(datafile) +P_atm = P_atm * 1000; +P_1 = P_atm - rho_water * g * h_1 - rho_oil * g * h_2 + rho_mercury * g * h_3; //pressure equilibrium +P_1 = P_1 / 1000; //converting from [Pa] to [kPa] +//result +printf("Air pressure in the tank is %1.0f kPa", P_1); |