Предмет: Информатика,
автор: nak97
Написать алгоритм поиска суммы денежного накопления в банке по истечению срока с учетом ежемесячных процентов. Если известно, что первоначальная сумма вклада S рублей, ежемесячно к сумме прибавляется р% от суммы предыдущего месяца. И время вклада n месяцев.
При помощи операторов for to do
Помогите пожалуйста, 3 дня голову ломаю(((
Ответы
Автор ответа:
0
Var i,n:integer; s,p:real;
Begin
write('S='); readln(s);
write('p='); readln(p);
write('n='); readln(n);
p:=p*0.01;
for i:=1 to n do s:=s+(s*p);
writeln('Ответ: ',s);
End.
Begin
write('S='); readln(s);
write('p='); readln(p);
write('n='); readln(n);
p:=p*0.01;
for i:=1 to n do s:=s+(s*p);
writeln('Ответ: ',s);
End.
Интересные вопросы
Предмет: Английский язык,
автор: mytskovaleria
Предмет: Математика,
автор: kazimovruslan079
Предмет: Алгебра,
автор: prankevichyana
Предмет: Физика,
автор: Vi4kinZ
Предмет: Обществознание,
автор: DashaNesquik