クイズ大陸



履歴 検索 最新 出題

No. 10≫ No.11 ≫No. 12
?鉄子 2007/12/12 13:54囁き
<HTML><BODY>
<FORM><TEXTAREA COLS=64 ROWS=32></TEXTAREA></FORM>
<SCRIPT language="JavaScript">
////////
////////Kenkichi様よかったらどうぞお使いください。
////////
p="";
for(i=2;i<10;i++){c=1;
for(j=1;j<2008;j++){c=(c*i)%100;};
p+=i+"の"+(j-1)+"乗割100の余り"+c;
p+=String.fromCharCode(13)+String.fromCharCode(10);
};
document.forms[0].elements[0].value=p;
</SCRIPT>
</BODY></HTML>
返信 編集