В первый год с яблони сняли 3 кг яблок каждый следующий урожай повышались на 20% когда с яблони снимут более 25 кг яблок паскаль

Question

Таби

6 декабря, 07:50

+3

Ответы (1)

Знаете ответ?

Элбан · Answer 1

var a, i: integer;

begin a:=3;

i:=1;

while a<=25 do

begin a:=a*1,2;

i:=i+1;

end;

writeln ('на', i, 'год') ;

end.