program paper;

type trec = record
	x,y:Integer;
	end;

var grid, card, paper:trec;

function pocet:integer;
var rez:integer;
    size:trec;
begin
    rez:=0;
    size.x:=card.x*grid.x;
    size.y:=card.y*grid.y;
    if size.x>paper.x then begin pocet:=0; exit; end;
    if size.y>paper.y then begin pocet:=0; exit; end;
    if size.x<paper.x then inc(rez);
    if size.y<paper.y then inc(rez);    
    rez:=rez+(grid.x-1)+(grid.x*(grid.y-1));
    pocet:=rez;
end;

procedure xchg(var a:trec);
var x:integer;
begin
  x:=a.x; a.x:=a.y; a.y:=x;
end;

var min:integer;

begin
    while true do
    begin    
	readln(grid.x,grid.y,card.x,card.y,paper.x,paper.y);
	if grid.x+grid.y+card.x+card.y+paper.x+paper.y=0 then break;
	min:=maxint;
	if (min>pocet) and (pocet<>0) then min:=pocet;
	xchg(grid);
	if (min>pocet) and (pocet<>0) then min:=pocet;
	xchg(card);
	if (min>pocet) and (pocet<>0) then min:=pocet;
	xchg(grid);
	if (min>pocet) and (pocet<>0) then min:=pocet;
	if min=maxint then writeln('The paper is too small.')
	    else writeln('The minimum number of cuts is ',min,'.');
	
    end;
end.