Сделайте мне, пожалуйста, задачку про урожайность, плиз!

[BeaU]

7)В некотором году (назвем его условно первым) на участке в 100 гектар средняя урожайность ячменя составила 20 центнеров с гектара. После этого каждый год площадь участка увеличивалась на 5%, а средняя урожайность на 2%. Определить, в каком году площадь участка станет больше 120 гектар?

[NetSpace]

тут же просто: сначала было 100 га, и каждый раз увеличиваем на 5% - это 5 га в год. тут цикл с предусловием
S:=100;//площадь
G:=1;//год
while (S<120)do
begin
S:=S*(1+0.05);//0,05 - это твои 5% в год
G:=G+1;//прибавляем по году
end;
Writeln('G=',G);//ну, или куда там надо вывести дату...