diff options
Diffstat (limited to '797/CH11/EX11.1s/11_01_solution.sce')
-rw-r--r-- | 797/CH11/EX11.1s/11_01_solution.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/797/CH11/EX11.1s/11_01_solution.sce b/797/CH11/EX11.1s/11_01_solution.sce new file mode 100644 index 000000000..3be682b46 --- /dev/null +++ b/797/CH11/EX11.1s/11_01_solution.sce @@ -0,0 +1,12 @@ +//Solution 11-1 +WD=get_absolute_file_path('11_01_solution.sce'); +datafile=WD+filesep()+'11_01_example.sci'; +clc; +exec(datafile) +//unit conversions +V = V * 1000 / 3600; //from [km/h] to [m/s] +P = P * 1.01325 * 10**5; //from [atm] to [Pa] +T = T + 273; //from [C] to [K] +rho_air = P / ( R * T); +C_D = 2 * F_D / (rho_air * A * V**2); +printf("Drag coefficient is %1.2f", C_D);
\ No newline at end of file |