Здравствуйте! Помогите, пожалуйста, с программой в паскале...

Вот задание:
"Банковская процентная ставка - K % в год (сложные проценты). Надо узнать через сколько лет начальная вложенная сумма увеличится в 2 раза. Вводить значение K."

Формула сложных процентов :



Формулу сложных процентов нашёл,но дальше не понимаю..Нам нужно написать программу используя операторы повтора, а я никак не пойму,что со степенью делать надо...Ведь получается,что именно её нам и надо найти. Подскажите пожалуйста ((

program Project1;
var
S,K:real;
N:integer;
begin
writeln('Wwedite procentnuju stawku (%/god) ');
readln(K);
N:=0;
K:=K/100;
S:=1;
while S<2 do
begin
S:=S*(1+K);
N:=N+1;
end;
writeln('Potrebuetsa ',N,' let');
readln;
end.

Помогите пожалуйста Решить уравнение с точностью :Е=10^(-5)
(0,6*3^x)-2,3*x-3=0