Một người gửi tiết kiệm không kì hạn với số tiền A đồng với lãi suất 0,2% mỗi tháng. Hỏi sau t tháng, người đó rút tiền thì sẽ nhận được số tiền là bao nhiêu. Biết rằng tiền gửi tiết kiệm không kì hạn không được tính lãi kép.
Chương trình cài đặt:
program Bai8;
uses crt;
var A, B, St, Luu : real; n: byte;
begin
clrscr;
write('Nhap so tien gui: '); readln(a);
write('Nhap so tien nhan: '); readln(b);
luu:=A; n:=0; st:=a;
while St<=B do
begin
St:=St+luu*0.003;
n:=n+1;
end;
writeln('So thang can la: ',n);
readln
end.
Khi chạy chương trình, với số tiền gửi ban đầu là 20000000 đồng. Muốn có được số tiền sau khi rút về là 25000000 đồng thì phải mất 112 tháng.
-- Mod Tin Học 11