flash on 2009-10-4

by uwi
@see http://projecteuler.net/index.php?section=problems&id=
へぁー Euler254の予定
♥0 | Line 43 | Modified 2009-10-06 02:19:10 | 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/ewlk
 */

package {
    import flash.display.Sprite;
    import flash.text.TextField;
    import flash.utils.getTimer;
    // @see http://projecteuler.net/index.php?section=problems&id=
    // へぁー Euler254の予定
    public class Euler extends Sprite {
        private var _tf : TextField;
  
        public function Euler() {
            _tf = new TextField();
            _tf.width = 465;
            _tf.height = 465;
            addChild(_tf);
            
            var s : int = getTimer();
            tr(solve());
            var g : int = getTimer();
            tr((g - s) + " ms");
        }

        private var _g : Array;
        
        private function solve() : int
        {
            tr(calcInvs(2)); 
            return 0;
        }
        
        private function calcInvs(p : int) : Array
        {
            var ret : Array = new Array(p);
            for(var i : int = 1;i < p;i++){
                if(ret[i])continue;
                for(var j : int = 1;j < p;j++){
                    if((i * j) % p == 1){
                        ret[i] = j;
                        ret[j] = i;
                        break;
                    }
                }
            }
            return ret;
        }

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