高手给看看，程序见附件。