Question

Программа выполняется в Паскале! Составьте программу для решения следующей задачи:Сбербанк начисляет 2% годовых. Вычислите, какой станет сумма вклада S, положенная в сбербанк на N лет. Значения S и N вводятся с клавиатуры. Помогите плииз.

Answer 1

Var S:real;k,N:integer;
begin
readln(S,N);
for k:= 1 to N do
S:=S+S/100*2;
writeln(S);
end.

Answer 2

Программа на языке Паскаль для решения данной задачи может выглядеть следующим образом:

program CalculateDeposit;

var
  S, result: real;
  N: integer;

begin
  writeln('Введите сумму вклада S:');
  readln(S);
  writeln('Введите количество лет N:');
  readln(N);

result := S * power(1 + 0.02, N);

writeln('Сумма вклада через ', N, ' лет будет равна ', result:0:2);
end.

Эта программа сначала запрашивает у пользователя ввести сумму вклада S и количество лет N. Затем она использует формулу для расчета конечной суммы вклада через N лет, учитывая начисление 2% годовых. Результат выводится на экран.

После ввода значений S и N программа вычислит и выведет на экран конечную сумму вклада через N лет.