Решите задачу на Паскале пожалуйста
Подрабатывая вечерами курьером, школьник решил накопить сумму в S рублей для покупки компьютера. В первый месяц он отложил R рублей. Затем его вклад каждый раз был на D% больше предыдущего вклада. Через сколько месяцев школьник сможет купить компьютер?
Answers & Comments
Ответ:
Объяснение:
var
s, r:real;
d, k:integer;
begin
writeln('Input s = ');
readln(s);
writeln('Input r = ');
readln(r);
writeln('Input d = ');
readln(d);
k:=1;
while (r<s) do begin
r:=r + r*d/100;
if (r<s)then k:=k+1;
end;
writeln(k);
readln;
end.