为我的女儿小雪写的小学一年级数学练习程序

分手后的思念是犯贱 2022-09-19 10:45 180阅读 0赞

<html><head><meta http-equiv="content-type" content="text/html; charset=UTF-8">  
</head><body>  
<button οnclick="create()">生成</button>  
<div id="result">  
</div>  
<script language="javascript">  
    function $(id)\{  
        return document.getElementById(id)  
    \}  
    function rand(b,t)\{  
        return Math.round(Math.random()\*(t-b))+b  
    \}  
    function create()\{  
        str='<table>'  
        for(var i=1;i<=40;i++)\{  
            str+='<tr>'  
            str+='<td>'+i+':</td>'  
            if(rand(0,1)==0)\{  
                var x=rand(1,19)  
                var y=rand(Math.max(1,10-x),20-x)  
                str=str+check(x+'+'+y,(x+y),i)  
            \}else\{  
                var x=rand(10,20)  
                var y=rand(1,x-1)  
                str=str+check(x+'-'+y,(x-y),i)  
            \}  
            str+='</tr>'  
        \}  
  
        str+='<tr></tr>'  
  
        for(var i=41;i<=50;i++)\{  
            str+='<tr>'  
            str+='<td>'+i+':</td>'  
            if(rand(0,1)==0)\{  
                var x=rand(1,19)  
                var y=rand(Math.max(1,10-x),20-x)  
                var z=rand(1,y-1)  
                str=str+check(x+'+'+y+'-'+z,(x+y-z),i)  
            \}else\{  
                var x=rand(2,20)  
                var y=rand(1,x-1)  
                var z=rand(Math.max(1,10-y),20-y)  
                str=str+check(x+'-'+y+'+'+z,(x-y+z),i)  
            \}  
            str+='</tr>'  
        \}  
  
        str+='</table>'  
        $('result').innerHTML=str  
    \}  
  
    function check(exp,v,i)\{  
        return '<td>'+exp+'=</td><td><input type=text οnblur="$(\\'msg'+i+'\\').innerHTML=(this.value=='+v+')?\\'正确\\':\\'错误\\'"& gt;</td><td><label id=msg'+i+'></label></td>'+''  
    \}  
</script>  
</body>

阅读(251) | 评论(0) | 转发(0) |

上一篇：\[转载\] web架构设计经验分享

下一篇：\[转载\]基于 REST 的 Web 服务：基础

相关热门文章

*  [javascript-对象中的方法...][javascript-_...]
 *  [月子中心的优缺点][Link 1]
 *  [轻盈瑜伽提醒：办公族美腿方案...][...]
 *  [精通信号处理设计小Tips（5）...][Tips_5_...]
 *  [精通信号处理设计小Tips（5）...][Tips_5_... 1]

*  IP Sec VPN与NAT破镜重圆
 *  网站导航
 *  UT2.0正式版下载
 *  tomcat6.0配置(含配置视频下载...
 *  Gomez中国网站用户体验排行榜(...

*  [LNMP 老是会出现502？][LNMP _502]
 *  [suse 运用一个shell获取本机和...][suse _shell_...]
 *  [虚拟机 unix 配置ip ][unix _ip]
 *  [hp-un 主机新系统读不到磁盘阵...][hp-un _...]
 *  [mysql出现问题：Starting MySQ...][mysql_Starting MySQ...]

给主人留下些什么吧！~~

评论热议

[javascript-_...]: http://blog.chinaunix.net/uid-25602770-id-4047997.html
[Link 1]: http://blog.chinaunix.net/uid-29400678-id-4047571.html
[...]: http://blog.chinaunix.net/uid-29355690-id-4047452.html
[Tips_5_...]: http://blog.chinaunix.net/uid-29322616-id-4047369.html
[Tips_5_... 1]: http://blog.chinaunix.net/uid-29322616-id-4047368.html
[LNMP _502]: http://ask.chinaunix.net/question/785370
[suse _shell_...]: http://ask.chinaunix.net/question/785369
[unix _ip]: http://ask.chinaunix.net/question/292361
[hp-un _...]: http://ask.chinaunix.net/question/37122
[mysql_Starting MySQ...]: http://ask.chinaunix.net/question/4616