Рост ребёнка на начало года 120 см. за месяц он подрастает на 2 процента. через сколько месяцев рост ребёнка превысит 150 см. ( решите и while).

vaniev2006 vaniev2006    2   26.07.2019 05:10    0

Ответы
Anzhelika0624 Anzhelika0624  03.10.2020 13:12
Var
P, x:real;
begin
P:=120;
while P<=150 do
begin
P:=P+0.02*P;
x:=x+1;
end;
write('Ребёнок подрастёт за:',x,' ','месяцев');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика