Draw up a program that will calculate a person’s contribution over several years, if the contribution

Draw up a program that will calculate a person’s contribution over several years, if the contribution is invested at 12% per annum.

program vklad;

var n: real;

j: integer;

begin

writeln (‘Enter the value of the initial deposit in rubles:’);

readln (n);

writeln (‘Enter the term in years:’);

readln (j);

for i: integer: = 1 to j do n: = n + n * 0.12;

writeln (‘Contribution at the end of the term:’, n: 10: 2, ‘p.’);

end.