var
a,b,c,d,ans,e:longint;
function max(i,j:longint):longint;
begin
if i>j then exit(j) else exit(i);
end;
begin
assign(input,'pencil.in');reset(input);
assign(output,'pencil.out');rewrite(output);
ans:=maxlongint;
readln(a);
for b:=1 to 3 do
begin
readln(c,d);
e:=c;
c:=a div c;
if a mod e<>0 then inc(c);
ans:=max(ans,c*d);
end;
writeln(ans);
close(input);
close(output);
end.