Программа на Pascal, которая рассчитает вклад человека за несколько лет:

program DepositCalculation;
var
deposit, annualInterestRate, years: integer;
begin
writeln${}^{\prime }Введитесуммувклада{:}^{\prime }$;
readln$deposit$;
writeln${}^{\prime }Введитегодовуюпроцентнуюставку{:}^{\prime }$;
readln$annualInterestRate$;
writeln${}^{\prime }Введитеколичестволет{:}^{\prime }$;
readln$years$;
for var i := 1 to years do
begin
deposit := deposit + deposit * annualInterestRate / 100;
writeln${}^{\prime }Чере{з}^{\prime },i{,}^{\prime }летнавашемсчетубудет{:}^{\prime },deposit:0:2$;
end;
end.

Программа запрашивает у пользователя сумму вклада, годовую процентную ставку и количество лет, на которые необходимо рассчитать вклад. Затем программа вычисляет вклад за каждый год с учетом годовой процентной ставки 12% и выводит результат на экран.