Задача по информатике...

Задача по информатике 10 класса.Здравствуйте. Создайте программу, которая будет высчитывать результат по следующим условиям:
"Человек делает вклад в банк 10000 рублей на 8 лет. Процентная ставка - 7,4 процента годовых. Определить сумму в конце вклада", язык программирования Pascal, использовать оператор for
Спасибо.

 

Program gt;
var a,b,p:real;
i:integer;
begin
a:=10000;
p:=7.4;
for i:=1 to 8 do
begin
a:=a+a*p/100;
end;
writeln(a);
end.