📄 top.htm
字号:
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE></TITLE>
<base target="main">
</HEAD>
<BODY>
<P onkeypress=keyDown()>计算<INPUT id=text1 name=T1 value=2 >
<a ><font size="3" onclick=start() color="#800000" onmouseover="this.style.color='red',this.style.cursor='hand'" onmouseout="this.style.color='green'">阶行列式(写好要算的阶数点击这里确定）</font></a></P>
<script language="javascript" >
function keyDown()
{
ns4 = (document.layers) ? true : false;
ie4 = (document.all) ? true : false;
var nkey
if(ns4)
nkey=e.which;
if(ie4)
nkey=event.keyCode;
if( nkey==13)
start();
}
function start()
{
parent.main.location.reload();
var N=T1.value;
//document.writeln("kdjgkd");
//M=open("","","","");//打开窗口并写入表格！
parent.main.document.writeln("<html><head><title>good</title></head><body><nobr>");
parent.main.document.writeln("<a onclick=\"printout()\"><font size=\"3\" color=\"#800000\" onmouseover=\"this.style.color='red',this.style.cursor='hand'\" onmouseout=\"this.style.color='green'\">计算</font></a>");
parent.main.document.writeln ("<div id=result>result</div><br>");
for(var i=0;i<N;i++)
{
for(var j=0;j<N;j++)
{
parent.main.document.writeln("<input type=\"text\" name=\"T"+i+"_"+j+"\""+" size=\"1\">");
}
parent.main.document.writeln("<br>");
}
//定义数组并让其与表格对应！
parent.main.document.writeln ("<script language=\"javascript\">")
parent.main.document.writeln ("var N="+N);
parent.main.document.writeln ("var T=new Array;");
parent.main.document.writeln (" for(var i=0;i<N;i++)");
parent.main.document.writeln (" T[i]=new Array;");
//写道表格所在网页定义T[][]；
parent.main.document.writeln ("function printout(){\n result.innerHTML=\"<font color=red>正在计算.....</font>\";\n var N="+N+";");
for(var ii=0;ii<N;ii++)
for(var jj=0;jj<N;jj++)
parent.main.document.writeln (" T["+ii+"]["+jj+"]=T"+ii+"_"+jj+".value;");//让表格与T[i][j]对应！
parent.main.document.writeln ("\n\
var Result=1;\n\
for(var j=N;j>0;j--)\n\
{\n\
Result*=calculate(j);\n\
}\n\
result.innerHTML=Math.round(Result*10000)/10000;\n\
}");
parent.main.document.writeln("\n\
function calculate(n)\n\
{\n\
if (n<=0) return 0;\/\/某一行全是0的时候return 0 \n\
else if(1==n)\n\
return T[0][0];\/\/最后是一阶行列式；\n\
else \n\
{\n\
if(0==T[n-1][n-1])\/\/如果最后一行最后一列式0这把这一行换掉！\n\
{\n\
var helper=0;\/\/帮助转换行列；\n\
for(var ii=n-2;ii!=-1&&0==T[n-1][ii];ii--);\n\
if(-1==ii) return 0;\/\/某一行全是0的时候return 0\n\
else \n\
{\n\
for(var iii=0;iii<N;iii++)\/\/把地N行和第ii行互换\n\
{\n\
helper=-T[iii][ii];\n\
T[iii][ii]=T[iii][n-1];\n\
T[iii][n-1]=helper;\n\
}\n\
}\n\
} \n\
\/\/已保证T[n-1][n-1]不为0可以开始计算了！\n\
\/*计算基本思想：用第归把它变成上三角行列式！这结果为主对角线乘积！\n\
*\/\n\
for(var i=0;i<n-1;i++)\n\
for(var j=0;j<n-1;j++)\n\
T[i][j]-=T[n-1][j]*(T[i][n-1]/T[n-1][n-1]);\n\
return T[n-1][n-1];\n\
}\n\
}");
parent.main.document.writeln ("<\/script>");
parent.main.document.writeln("</body></html>");
}
</script>
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -