# 2.3.jl
# 2024-10-26
# $Id: 2.3.jl 1.1 2024/10/26 14:20:31 s Exp $

# r  : nominal rate
# n  : a number of months
# er_percent : effective interset rate in percent 

using Printf

# input
r = 0.03
n = 12

# calculation
er_percent = ((1 + r / 12) ^ n - 1) * 100

# output
println("2.3.jl")
@printf("%10s%10.4f\n", "r=", r)
@printf("%10s%10d\n",   "n=", n)
@printf("%10s%10.2f\n", "er(%)=", er_percent)
# end