Mathematica解决最优化选课问题

某学生在某学期有一门必修课（2学分）；供限选课程8门，任意选修课10门。某些课程之间有联系，所以在选修某门课程的同时必须选修其他课程，这18门课的学分和同时选修要求如附图按规定，每个学生每学期选修的学分不能少于23学分。因此，学生必须在上面的18门课中至少选修21分，学校还规定学生每学期选修任意选修课的学分不少于3分，不超过6分。式制定一种选课方案。


给出Mathematica程序代码，最好有注释方便理解