Рост ребёнка на начало года 120 см. за месяц он подрастает

Рост ребёнка на начало года 120 см. за месяц он подрастает на 2 процента.
Через сколько месяцев рост ребёнка превзойдет 150 см.
(ПОЖАЛУЙСТА решите 2 методами FOR и While).

Задать свой вопрос
1 ответ
Var
P, x:real;
begin
P:=120;
while Plt;=150 do
begin
P:=P+0.02*P;
x:=x+1;
end;
write('Ребёнок подрастёт за:',x,' ','месяцев');
end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт