Question

1. Составить блок-схему алгоритма решения
задачи: Клиент внес в банк R рублей. Каждый
месяц эта сумма увеличивается на W
процентов. Сколько будет у клиента денег через два месяца, три месяца, через полгода?​

Answer 1

var r,w,s:integer;

begin

writeln('Введите исходные данные:');

write('Величина вклада (руб.): ');

readln(r);

write('Ежемесячная величина дохода (руб) ');

readln(w);

s:=r+3*w;

write('Сумма вклада по окончании трех месяцев: ',s,' руб.');

s:=r+6*w;

write('Сумма вклада по окончании шести месяцев: ',s,' руб.');

s:=r+12*w;

write('Сумма вклада по окончании года: ',s,' руб.');

end.