Program Augustin;
var
x,y,z,i,d:integer;
s:real;
begin
Writeln('Introdu inaltimea copacului');
readln(x);
Writeln('Introdu citi metri urca ziua');
readln(y);
Writeln('Introdu citi metri coboara noaptea');
readln(z);
d:=y-z;
s:=x/d;
Writeln('Va ajunge in a ',s,' zi');
readln;
end.