コマ大
約数が28個の一番最小の自然数は?
♥0 |
Line 52 |
Modified 2009-06-05 08:18:28 |
MIT License
archived:2017-03-20 17:19:51
ActionScript3 source code
/**
* Copyright Fricks ( http://wonderfl.net/user/Fricks )
* MIT License ( http://www.opensource.org/licenses/mit-license.php )
* Downloaded from: http://wonderfl.net/c/At1y
*/
/*約数が28個の一番最小の自然数は?*/
package {
import flash.display.Sprite;
import flash.events.Event;
import flash.text.TextField;
import flash.text.TextFieldType;
import flash.text.TextFieldAutoSize;
public class FlashTest extends Sprite {
private var num:Number = 1;
private var divisorNum:Number = 28;
private var t:TextField;
private var t2:TextField;
public function FlashTest() {
// write as3 code here..
init();
}
private function init(){
t = new TextField();
t.x = 15;
t.y = 15;
t.wordWrap =true;
t.border = true;
t.type = TextFieldType.DYNAMIC;
t.autoSize=TextFieldAutoSize.LEFT
addChild(t);
t2 = new TextField();
t2.x = 15;
t2.y = 45;
t2.wordWrap =true;
t2.border = true;
t2.type = TextFieldType.DYNAMIC;
t2.autoSize=TextFieldAutoSize.LEFT
addChild(t2);
addEventListener(Event.ENTER_FRAME,enterFunc);
}
private function enterFunc(e:Event){
var eNum:Number=mathComa(num);
if(eNum==divisorNum)endFunc(num,eNum);
t.text = String(num);
t2.text = String(eNum);
num++;
}
private function mathComa(mNum:Number):Number{
var aNum:Number = 0;
for(var i=1;i<=mNum;i++){
if(mNum%i==0)aNum++;
}
return aNum;
}
private function endFunc(aaNum:Number,bbNum:Number){
removeEventListener(Event.ENTER_FRAME,enterFunc);
//t.text = String(aaNum);
//t2.text = String(bbNum);
}
}
}