1 files changed, 8 insertions, 0 deletions
diff --git a/2795/CH16/EX16.1/Ex16_01.sce b/2795/CH16/EX16.1/Ex16_01.sce
new file mode 100755
index 000000000..e9fa32166
--- /dev/null
+++ b/2795/CH16/EX16.1/Ex16_01.sce
@@ -0,0 +1,8 @@
+// Scilab Code Ex16.1: Page-581(2014)
+clc; clear;
+H0 = 22;    // Value of Hubble constant, km/s per million ly
+parsec = 3.26;    // The value of 1 parsec, light years
+printf("\nThe value of Hubble constant = %d km/s per Mpc", ceil(H0*parsec));
+
+// Result
+// The value of Hubble constant = 72 km/s per Mpc 
+\ No newline at end of file