Giving money to the bank
Care about indentation. Pascal is usually written with 2 space indentation.
Repeat is a posttest loop, and your code needs to run at least once, so why not a repeat..until loop. You can save a begin..end block, as well.
you should explain to your self the inputs, unite measures and all the info you need to properly insert the requested variables.
in pascal, prefixing your own variables is good practice for complex code (not your case). Take a look at this answer. I choose to prefix our global variables with 'G'; Also, functions and procedures goes with CapitalLetters.
Avoid repetition, I choose to use GAccMoneyOut:=GMoneyControl; instead of repeating the code to raise the money.
Care about the user, you should use readkey and not readln at the end. ReadLn increases the chance of getting lost. 


Putting all together:

program whilel;

uses Crt;

var
  GInterestRate,
  GMoneyEveryYear,
  GTotalAmount,
  GMoneyControl,
  GAccMoneyOut:real;

begin
  WriteLn('Enter the porcentage interest rate');
  ReadLn(GInterestRate);

  WriteLn('Enter the money you will put every year into the account');
  ReadLn(GMoneyEveryYear);

  WriteLn('Enter the money you want to get');
  ReadLn(GTotalAmount);

  GAccMoneyOut:=0;
  GMoneyControl:=0;
  repeat
    GMoneyControl:=(GAccMoneyOut+GMoneyEveryYear)*((GInterestRate/100)+1);
    if GMoneyControl&gt;GTotalAmount then
      Break
    else
      GAccMoneyOut:=GMoneyControl;
  until GAccMoneyOut=GTotalAmount;

  WriteLn('Result is:');
  WriteLn(GAccMoneyOut:6:2);

  WriteLn('Press any key to exit...'); 
  Readkey;
end.