summaryrefslogtreecommitdiff
path: root/1553/CH10/EX10.31/10Ex31.sce
blob: 49037924d7867e34cfd79fd5794ded15bb5525cb (plain)
1
2
3
4
5
6
7
8
9
10
//chapter 10 Ex 31

clc;
clear;
close;
redPercent=(25/4)/100; more=120;
redRate=1-redPercent; //this term has to be multiplied by original rate that is found below
originalRate=(more*(1/redRate-1));
reducedRate=originalRate*redRate;
mprintf("The reduced rate is Rs. %.2f per kg",reducedRate);