$pingshi=Random(5,70,1) $qimo=Random(5,30,1) $1=Random(90,100,1) $pingshi+$qimo=$1
举报
For $i=1 To 999999999 $pingshi=Random(5,70,1) $qimo=Random(5,30,1) $1=Random(90,100,1) If $1=$pingshi+$qimo Then FileWriteLine(@ScriptDir&"\成绩.txt",'平时:'&$pingshi&' 期末:'&$qimo&' 总分:'&$1&' 运算次数:'&$i) ToolTip($i) Next
Do $1=Random(90,100,1) Do $xuexishishu=Random(4,5,1);学习时数 $xuexitaidu=Random(18,25,1);学习态度 Until $xuexishishu+$xuexitaidu<30 Do $zuoye=Random(1,15,1);作业 $ceyan=Random(1,15,1);测验 $chengji=Random(10,40,1);成绩 Until $zuoye+$ceyan+$chengji<70 Until $zuoye+$ceyan+$chengji+$xuexishishu+$xuexitaidu>90 MsgBox(0,0,$zuoye & " " & $ceyan & " " & $chengji& " " & $xuexishishu & " " & $xuexitaidu & " " & ($zuoye+$ceyan+$chengji+$xuexishishu+$xuexitaidu))
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-7-28 00:59 , Processed in 0.137368 second(s), 23 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2025 Discuz! Team.