Một người gửi tiền ngân hàng với dố tiền ban đầu là a. Lãi xuất mỗi tháng là k%. Hãy cho biết số tiền ng đó rút ra sau khoảng thời gian T tháng,biết rằng tiền lãi đc tính,lãi lũy kế theo chu kì C tháng nghĩa là sau mỗi tháng lãi xuất sẽ đc cộng vào tiền gốc nhưng đúng chu kì C tháng mới cho phép đc rút. Pascal tin học các bạn nhé!! Giúp mk với

#include <iostream>
using namespace std;
int main()
{
    float k,a;
    int T;
    cout<<"Nhap tien gui: ";
    cin>>a;
    cout<<"Nhap phan tram lai suat: ";
    cin>>k;
    cout<<"Nhap so thang gui: ";
    cin>>T;
    for(int i=1;i<=T;i++){
        a+=a/100*k;
    }
    cout<<a;
    //samon247
    return 0;
}

uses crt;
var a,k:real; t,i:integer;
begin
clrscr;
Write('a=');readln(a);
Write('k=');readln(k);
Write('T=');readln(T);
For i:=1 to t do
   a:=a+(a/100*k);
Writeln(a:0:8);
readln

end.

Mình dùng thuật toán mà lúc lớp 5 mình học:

Số tiền + (số tiền : 100 x lãi xuất)