program Project1;
uses
  System.SysUtils;
var
   A, X, B, C, D, E, X1, X2, I: Integer;
   Y, Max: Real;
begin
   WriteLn('Введите через пробел a, b, c, d, e, x1, x2');
   Readln(A, B, C, D, E, X1, X2);
   for I := X1 to X2 do
   begin
      Y := (A * X * X + B * X + C) / (D * X + E);
      if (Max <= Y) then Max := Y;
   end;
   WriteLn(Max:8:2);
   readln;
end.