(PARI) is_
A203603(n)={ my( t, d=eval( setminus( Vec("0123456789"), vecsort( Vec( Str( n )), , 8))), v1=[1, 1, 10, 1, 1, 10, 100]~, v2=[1, 10, 10, 1, 1, 1, 10]~); n<999 & #d==7 & for( p=1, 7!, t=vecextract(d, numtoperm(7, p)); n != t*v1 & n != t*v2 & next; t[1] * t[2] * t[3] * t[7] & return( if( n == t*v1, Str( t[2]"+"t[1]"+"t[3], t[4]"+"t[7], t[6], t[5] ), t )))} \\
M. F. Hasler, Jan 03 2012