Post Reply 
Effective and Nominal Rate
05-17-2015, 03:52 PM (This post was last modified: 05-23-2015 01:56 PM by salvomic.)
Post: #1
Effective and Nominal Rate
hi all,
here a simple program to calculate the effective and nominal interest rate (both finite and compound)

effective_rate(nominal, compound), eff_cont_rate(nominal), nominal_rate(effective, compound), nominal_cont_rate(effective)
simp_comp(sint,t)
comp_simp(cint,t)

The rates (effective and nominal) must me entered in decimal: i.e. 0.05 (5%), 0.12 (12%), compound period are i.e. 12 or 4, 3, and so on...
simp_comp and comp_simp convert to and from simple and compound rate (i.e. 0.13), t is the period of time.

Enjoy!
Salvo M.

Code:

EXPORT effective_rate(nominal, compound)
// Finite (simplex) compounding
// nominal = nominal rate (i.e. 0.05), compound = number of compounding period per year (i.e. 12)
BEGIN
local effective;
effective:= ((1+ nominal/compound)^compound - 1);
return effective;
END;

EXPORT eff_cont__rate(nominal)
// Continous compounding
// nominal = nominal rate (i.e. 0.05)
BEGIN
local effective;
effective:= ((e^nominal) - 1);
return effective;
END;

EXPORT nominal_rate(effective, compound)
// Finite (simplex) compounding
// effective = effective rate (i.e. 0.05), compound = number of compounding period per year (i.e. 12)
BEGIN
local nominal;
nominal:= ((effective + 1)^(1/compound)-1)*compound;
return nominal;
END;

EXPORT nominal_cont__rate(effective)
// Continous compounding
// effective = effective rate (i.e. 0.05)
BEGIN
local nominal;
nominal:= LN(effective + 1);
return nominal;
END;

EXPORT simp_comp(sint,t)
// Simple inerest (i.e. 0.05) to compound interest, t = period
BEGIN
local cint;
cint:= ((1+sint*t)^(1/t))-1;
RETURN cint;
END;

EXPORT comp_simp(cint, t)
// Compound  interest (i.e. 0.05) to simple, t = period
BEGIN
local sint;
sint:= ((1+cint)^t-1)/t;
RETURN sint;
END;

∫aL√0mic (IT9CLU) :: HP Prime 50g 41CX 71b 42s 39s 35s 12C 15C - DM42, DM41X - WP34s Prime Soft. Lib
Visit this user's website Find all posts by this user
Quote this message in a reply
07-10-2017, 09:08 PM
Post: #2
RE: Effective and Nominal Rate
Hi, thanks a lot for your programs but this isn't working with my calculator, firmware 20160829

Thanks









(05-17-2015 03:52 PM)salvomic Wrote:  hi all,
here a simple program to calculate the effective and nominal interest rate (both finite and compound)

effective_rate(nominal, compound), eff_cont_rate(nominal), nominal_rate(effective, compound), nominal_cont_rate(effective)
simp_comp(sint,t)
comp_simp(cint,t)

The rates (effective and nominal) must me entered in decimal: i.e. 0.05 (5%), 0.12 (12%), compound period are i.e. 12 or 4, 3, and so on...
simp_comp and comp_simp convert to and from simple and compound rate (i.e. 0.13), t is the period of time.

Enjoy!
Salvo M.

Code:

EXPORT effective_rate(nominal, compound)
// Finite (simplex) compounding
// nominal = nominal rate (i.e. 0.05), compound = number of compounding period per year (i.e. 12)
BEGIN
local effective;
effective:= ((1+ nominal/compound)^compound - 1);
return effective;
END;

EXPORT eff_cont__rate(nominal)
// Continous compounding
// nominal = nominal rate (i.e. 0.05)
BEGIN
local effective;
effective:= ((e^nominal) - 1);
return effective;
END;

EXPORT nominal_rate(effective, compound)
// Finite (simplex) compounding
// effective = effective rate (i.e. 0.05), compound = number of compounding period per year (i.e. 12)
BEGIN
local nominal;
nominal:= ((effective + 1)^(1/compound)-1)*compound;
return nominal;
END;

EXPORT nominal_cont__rate(effective)
// Continous compounding
// effective = effective rate (i.e. 0.05)
BEGIN
local nominal;
nominal:= LN(effective + 1);
return nominal;
END;

EXPORT simp_comp(sint,t)
// Simple inerest (i.e. 0.05) to compound interest, t = period
BEGIN
local cint;
cint:= ((1+sint*t)^(1/t))-1;
RETURN cint;
END;

EXPORT comp_simp(cint, t)
// Compound  interest (i.e. 0.05) to simple, t = period
BEGIN
local sint;
sint:= ((1+cint)^t-1)/t;
RETURN sint;
END;
Find all posts by this user
Quote this message in a reply
Post Reply 




User(s) browsing this thread: 1 Guest(s)