Всбербанк сделан вклад на s рублей. определить величину вклада через n лет, если известно, что ежегодный вклад увеличивается на p%. решить в pascalabc

Var
n:integer;
i:byte;
s,p:real;

begin

readln(s,n,p);

for i:=1 to n do 
s:=s*(1+p/100);

writeln(s);

end.