Project Euler 136

by uwi
@see http://projecteuler.net/index.php?section=problems&id=136
♥0 | Line 41 | Modified 2009-07-24 03:04:40 | MIT License
play

ActionScript3 source code

/**
 * Copyright uwi ( http://wonderfl.net/user/uwi )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/bUpQ
 */

package {
    import flash.display.Sprite;
    import flash.text.TextField;
    import flash.utils.getTimer;
    // @see http://projecteuler.net/index.php?section=problems&id=136
    public class Euler136 extends Sprite {
        private var _tf : TextField;
  
        public function Euler136() {
            _tf = new TextField();
            _tf.width = 465;
            _tf.height = 465;
            addChild(_tf);
            
            var s : int = getTimer();
            t(solve(50000000));
            var g : int = getTimer();
            t((g - s) + " ms");
        }

        // ごり☆おし
        private function solve(M : int) : int
        {
            var map : Array = new Array(M);
            var i : int;
            for(i = 0;i < M;i++)map[i] = 0;
            
            var asup : int = M * 3 / 4;
            for(var a : int = 1;a <= asup;a++){
                for(var k : int = int(a / 3) + 1;;k++){
                    var n : int = int(3 * k - a) * int(a + k);
                    if(n >= M)break;
                    map[n]++;
                }
            }
            
            var ct : int = 0;
            for(i = 0;i < M;i++){
                if(map[i] == 1)ct++;
            }

            return ct;
        }

	private function t(o : *) : void
	{
            _tf.appendText("" + o + "\n");
	}
    }
}