Сумма 10000 рублей положена в сберегательный банк, при этом прирост составляет 5% годовых. Составьте алгоритм, определяющий, через какой промежуток
времени первоначальная сумма увеличится в два раза.
Напишите программу КуМир. Очень нужно....

Мне нужен КуМир

var  i:integer;  x:real;beginx:=10000;while x<20000 do  begin  x:=x*1.05;  i:=i+1;  end;writeln('Ответ: ',i);  end.