задача с любым оператором Опции

[Nfsmaster]

помогите решить:
вы сделали вклад в банк, ежегодно банк начисляет вам 7% годовых, каков будет размер вклада через 5 лет?
и сделайте пожалуйста с екселем.
конечно извиняюсь за ОФФ. но я прошу именно здесь потому что не могу писать сразу на 2 фоурмах. очень прошу решить...

[klem4]

{$n+}
var
   n,s : single;
   i : byte;
begin

   write('n = '); readln(n);

   s := n;

   for i := 1 to 5 do begin
       s := s + s/100 * 7;
   end;

   writeln(s:3:2);
end.