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

Question

Ефрисиния

30 октября, 13:04

+5

Ответы (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.