1 13325 Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-22 #1 自动出10以内的算术运算题(+,-,*,/); 回答正确时没题得10分; 以百分为基准,每执行一次程序出10道算术题;
J jsbyl Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-22 #2 把你的E-MAIL地址留下来,我用DELPHI写了一个
无 无题 Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-22 #3 给你一段自动出题的代码 procedure TForm1.Button1Click(Sender: TObject); var I: Integer; begin Randomize; for I := 1 to 10 do begin Canvas.TextOut(20,I*20, IntToStr(Random(9)+1)+'×'+IntToStr(Random(9)+1)+'='); Canvas.TextOut(220,I*20, IntToStr(Random(100))+'+'+IntToStr(Random(100))+'='); end; end; 上面是100内随机出题的例子
给你一段自动出题的代码 procedure TForm1.Button1Click(Sender: TObject); var I: Integer; begin Randomize; for I := 1 to 10 do begin Canvas.TextOut(20,I*20, IntToStr(Random(9)+1)+'×'+IntToStr(Random(9)+1)+'='); Canvas.TextOut(220,I*20, IntToStr(Random(100))+'+'+IntToStr(Random(100))+'='); end; end; 上面是100内随机出题的例子
X xiuguo Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-22 #4 我做了一个专门用于公式翻译的程序,用的是编译原理里面的波兰表达式,效果很好! 一共包含了+,-,*,/,(,)共六种操作运算符,可以自己出题,也可以随机出题,感兴趣的 话,发e-mail:XiuGuo@263.net
我做了一个专门用于公式翻译的程序,用的是编译原理里面的波兰表达式,效果很好! 一共包含了+,-,*,/,(,)共六种操作运算符,可以自己出题,也可以随机出题,感兴趣的 话,发e-mail:XiuGuo@263.net
Y yangyee Unregistered / Unconfirmed GUEST, unregistred user! 2001-06-01 #6 给你推荐一本书,《delphi时尚编程100例》里面的第一例就是你的问题