用 Mathematica 算「24点」的札记。四张牌、三种运算符的排列组合,用 TuplesReplaceFoldInactive 构造表达式树,Select[res, Activate[#]==24&] 筛选等于 24 的表达式。

显示问题

希望把 ((6+4)+-2)*3 显示为 ((6+4)-2)*3。可用 StringForm 或自定义格式化仅做显示。