Некто положил в банк S рублей. Через сколько лет сумма вклада более, чем в 2 раза превысит первоначальный вклад, если годовой процент составляет x%.Паскаль

Некто положил в банк S рублей. Через сколько лет сумма вклада более, чем в 2 раза превысит первоначальный вклад, если годовой процент составляет x%.Паскаль
Гость
Ответ(ы) на вопрос:
Гость
var s,x,sum:real; k:integer; begin write('s = '); readln(s); write('x = '); readln(x); sum:=s; k:=0; while sum<=2*s do  begin  k:=k+1;  sum:=sum+sum*x/100;  end; writeln('k = ',k); end. Пример: s = 2000 x = 10 k = 8
Не нашли ответ?
Ответить на вопрос
Похожие вопросы