summaryrefslogtreecommitdiff
path: root/1964/CH15/EX15.10/ex15_10.sce
blob: fad9083008ea6b6ac62332b9e385a9ddf9c439b8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//Chapter-15, Example 15.10, Page 497
//=============================================================================
clc
clear
//CALCULATIONS
//using 1's complement method
x1=base2dec(['1000'],2)//converting binary to decimal
x=bin2dec('1010')
x2=dec2bin(bitcmp(x,4))//1's complement of a number
disp(x2)
x3=base2dec([x2],2)
x4=x1+x3+1;
x5=dec2base(x4,2)//converting decimal to hexadecimal
disp(x5)
//using normal method
a=base2dec(['1000','1010'],2);//converting binary to decimal
b=a(2)-a(1);//subtraction
c=dec2base(b,2)//converting decimal to binary
disp(c)
//since we cannot use dec2base for negative integers,we cannot do (a(1)-a(2)) but we can do (a(2)-a(1)),with '-' sign added before the result.hence 'c' here is actually -'c'
//=================================END OF PROGRAM=======================================================================================================