var
  mat : array [1..6, 1..6] of longint = 
        ( (-23, 11, -17, 8, -10, -10),
          (17, -25, -58, -32, -45, -65),
          (-20, -58, 28, -30, 4, -21),
          (-10, -47, -31, 100, -10, 25),
          (-11, -48, 29, -17, 2, -14),
          (14, -70, 80, 20, 41, -41) );
  i, j : longint;       

function ok(batas, r, c : integer; arah : string):boolean;
begin
  if (r > 6) or (c > 6) then exit (false);
  if (batas + mat[r][c] <= 0) then exit(false);
  inc(batas, mat[r][c]);
  if (r = 6) and (c = 6) then
  begin
    writeln(arah);
    exit(true);
  end;
  exit(ok(batas, r+1,c, arah + 'd') or ok(batas, r,c+1, arah + 'r'));
end;

begin
  for i := 1 to 100 do
  begin
    if (ok(i, 1, 1, '')) then
    begin
      writeln(i);
      break;
    end;
  end;
end.