Написать алгоритм поиска суммы денежного накопления в банке по истечению срока с учетом ежемесячных процентов. Если известно, что первоначальная сумма вклада S рублей, ежемесячно к сумме прибавляется р% от суммы предыдущего мес...
Написать алгоритм поиска суммы денежного накопления в банке по истечению срока с учетом ежемесячных процентов. Если известно, что первоначальная сумма вклада S рублей, ежемесячно к сумме прибавляется р% от суммы предыдущего месяца. И время вклада n месяцев.
При помощи операторов for to do
Помогите пожалуйста, 3 дня голову ломаю(((
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы