diff options
Diffstat (limited to '548/CH5/EX5.08/5_08.sce')
| -rwxr-xr-x | 548/CH5/EX5.08/5_08.sce | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/548/CH5/EX5.08/5_08.sce b/548/CH5/EX5.08/5_08.sce new file mode 100755 index 000000000..d67f76e2d --- /dev/null +++ b/548/CH5/EX5.08/5_08.sce @@ -0,0 +1,6 @@ +pathname=get_absolute_file_path('5_08.sce')
+filename=pathname+filesep()+'5_08data.sci'
+exec(filename)
+Cn=integrate('1-0.95*y','y',0,1.0)-integrate('1-300*y^2 ','y',0,0.1)-integrate('-2.2277+2.2277*y','y',0.1,1.0)
+printf("\Answer:\n")
+printf("\n\Normal force coefficient : %f \n\n",Cn)
|