Технический форум - Циклическая задача

Технический форум (http://www.tehnari.ru/)

- Помощь студентам (http://www.tehnari.ru/f41/)

- - Циклическая задача (http://www.tehnari.ru/f41/t43040/)

Циклическая задача

циклическая задача
население города ежегодно увеличивается на К%, через сколько лет население города утроится.

Цитата:

Сообщение от maria345 (Сообщение 426805)

Да ну... детский сад прям... ну пожалуйста:

Код:

VAR

 K:BYTE;

 N:Word;

 Coef:Real;

BEGIN

 Write('K(%)= ');

 ReadLn(K);

 Coef:=1;

 N:=0;

 Repeat

  Inc(N);

  Coef:=Coef*(1+0.01*K);

 Until Coef>=3.0;

 Writeln('After ',N,' years');

 ReadLn;

END.