• Предмет: Информатика
  • Автор: vika13082001j
  • Вопрос задан 9 лет назад

Сумма 10 000 рублей положена в банк. Прирост - 5% годовых. Через сколько лет сумма увеличится вдвое?
Составить программу на Паскаль

Ответы

Ответ дал: Ex1mik3
0
program qq;
var years:integer;
var res, a:double;
begin
  res:=10000;
  a:=res*2;
  years:=0;
    while (res < a) do
    begin
      res:=res + (res/100)*5;
      years:=years+1;
    end;
  write(years);
end.
Приложения:
Похожие вопросы