summaryrefslogtreecommitdiff
path: root/1553/CH10/EX10.20/10Ex20.sce
blob: f576d290cfbe2a7480f18c2ecd56d64dc04f1305 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//chapter 10 Ex 20

clc;
clear;
close;
spends=75/100; inc=20/100; expPercent=10/100;
original=100;
expAmt=original*spends;
saving=original-expAmt;
newIncome=original*(1+inc);
newExp=(1+expPercent)*expAmt;
newSaving=newIncome-newExp;
incSaving=newSaving-saving;
incPercent=(incSaving/(1-spends));
mprintf("The increase in percentage is %d percent",incPercent);