seq() = { my(res = List()); for(i = 100, 999, si = Set(digits(i)); if(#si == 3, for(j = i, 999-i, ti = Set(concat([si, digits(j), digits(i+j)])); if(#ti == 9 && ti[1] != 0, listput(res, 10^6*i + 10^3*j + i+j); listput(res, 10^6*j + 10^3*i + i+j); ) ) ) ); Set(res) }