1 files changed, 10 insertions, 0 deletions

diff --git a/3845/CH5/EX5.1/Ex5_1.sce b/3845/CH5/EX5.1/Ex5_1.sce
new file mode 100644
index 000000000..118dad443
--- /dev/null
+++ b/3845/CH5/EX5.1/Ex5_1.sce
@@ -0,0 +1,10 @@
+//Example 5.1

+f_k=45;//Friction (N)

+m=62;//Mass of skier (kg)

+g=9.80;//Acceleration due to gravity (m/s^2)

+theta=25;//Inclination of slope (deg)

+N=m*g*cosd(theta);//Normal force perpendicular to slope (N)

+mu_k=f_k/N;//Coefficient of kinetic friction

+printf('Coefficient of kinetic friction = %0.3f',mu_k)

+//Openstax - College Physics

+//Download for free at http://cnx.org/content/col11406/latest