var massiv = ["яблочный пирог", "соус_острый", "яблоки_красные"];

function findPartial(a, s) {
    while (s) {
        var reg = new RegExp(s)
        for (var i = 0; i < a.length; i++)
            if (reg.test(a[i])) return i;
        s = s.slice(0, -1)

    }

    return -1;
}

alert(findPartial(massiv, "яблокo"));

var massiv = ["яблочный пирог", "соус_острый", "яблоки_красные"];
 
function findPartial(a, s) {
    while (s) {
        var reg = new RegExp(s)
        for (var i = 0; i < a.length; i++)
            if (reg.test(a[i])) return i;
        s = s.slice(1, -1)
 
    }
 
    return -1;
}
 
alert(findPartial(massiv, "яблосоус"))

var massiv = ["яблочный пирог", "соус_острый", "яблоки_красные"];

function findPartial( a, s )
{
  var i;
  if( s.length > 3 ) {
    i = s.length - 3;
    var r = s.substr( i, 3 );
    while( --i >= 0 )
      r += "|" + s.substr( i, 3 );
    r = new RegExp( r );
    for( i = 0; i < a.length; ++i )
      if( r.test( a[i] ) )
        return i;
  } else {
    for( i = 0; i < a.length; ++i )
      if( a[i].indexOf( s ) >= 0 )
        return i;
  }
  return -1;
}

alert( findPartial( massiv, "острота" ) );