1 files changed, 6 insertions, 0 deletions
diff --git a/1301/CH5/EX5.16/ex5_16.sce b/1301/CH5/EX5.16/ex5_16.sce
new file mode 100755
index 000000000..a27d1461c
--- /dev/null
+++ b/1301/CH5/EX5.16/ex5_16.sce
@@ -0,0 +1,6 @@
+clc;
+v=20;   //velocity in m/sec
+g=9.8;  //g in m/sec square
+h=200;  //height in m
+diff=(v*v)/(2*9.8*200);  //calculating Final KE/Initial PE
+disp((1-diff)*100,"Percent of initial PE lost = "); //displaying result
+\ No newline at end of file