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

Question

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

BlackPupils · Answer

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.

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