summaryrefslogtreecommitdiff
path: root/1553/CH32/EX32.1/32Ex1.sce
blob: 71eb0ac4be061bd9855cdd0a58da5ee59d1206d1 (plain)
1
2
3
4
5
6
7
8
9
//Chapter 32 Ex 1

clc;
clear;
close;
amt=930; R=3; t=8;
PW=(100*amt)/(100+(R*t));
TD=amt-PW;
mprintf("The present worth  and true discount of Rs.930 due 3yrs at 8 percent per annum Rs %d and Rs %d",PW,TD);