Цитата:
Сообщение от maria345
циклическая задача
население города ежегодно увеличивается на К%, через сколько лет население города утроится.
|
Да ну... детский сад прям... ну пожалуйста:
Код:
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.