Với giả định lãi suất từ ngân hàng là t%/tháng, số vốn ban đầu là n, số tháng gởi là k, tổng số tiền sau k tháng bao gồm lãi vốn là m, ta có thể tính được các thông số trên sử dụng các công thức sau:

a) Tổng số tiền sau k tháng = n * (1 + t/100)^k

b) Số tháng cần gởi = log(m/n) / log(1 + t/100) (log là hàm logarit của Pascal)

c) Số vốn ban đầu = m / (1 + t/100)^k

Dưới đây là mã chương trình Pascal cho việc tính lãi suất tiết kiệm ngân hàng:
program interest_calculator;

var
  t, n, k, m: Real;

begin
  WriteLn('Nhap lai suat t%/thang:');
  ReadLn(t);
  WriteLn('Nhap so von ban dau n:');
  ReadLn(n);
  WriteLn('Nhap so thang can goi k:');
  ReadLn(k);
  m := n * Power(1 + t/100, k);
  WriteLn('Tong so tien sau ', k:0:0, ' thang la ', m:0:2);
  WriteLn('Nhap so tien can nhan m:');
  ReadLn(m);
  k := Log10(m/n) / Log10(1 + t/100);
  WriteLn('So thang can goi la ', k:0:2);
  WriteLn('Nhap so tien can nhan m:');
  ReadLn(m);
  n := m / Power(1 + t/100, k);
  WriteLn('So von ban dau la ', n:0:2);
end.