summaryrefslogtreecommitdiff
path: root/3808/CH4/EX4.8/Ex4_8.sce
diff options
context:
space:
mode:
Diffstat (limited to '3808/CH4/EX4.8/Ex4_8.sce')
-rw-r--r--3808/CH4/EX4.8/Ex4_8.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/3808/CH4/EX4.8/Ex4_8.sce b/3808/CH4/EX4.8/Ex4_8.sce
new file mode 100644
index 000000000..63c5a0374
--- /dev/null
+++ b/3808/CH4/EX4.8/Ex4_8.sce
@@ -0,0 +1,25 @@
+//Chapter 04:Number Theory and Cryptography
+
+clc;
+clear all;
+
+bin_eq=[]
+decn=input("Enter the decimal number:")
+tn=decn
+i=1
+b=floor(decn/2)
+rem=modulo(decn,2)
+bin_eq(i)=string(rem(i))
+while 2<=b
+ decn=b
+ i=i+1
+ b=floor(decn/2)
+ rem=modulo(decn,2)
+ bin_eq(i)=string(rem)
+end
+bin_eq(i+1)=string(b)
+bin_eq=eval(bin_eq)
+mprintf("The binary equivalent of the decimal number %d is:",tn)
+for i=length(bin_eq):-1:1
+ mprintf("%d",bin_eq(i))
+end