var factArr:Array = new Array();

 

factArr[0] = 0;

factArr[1] = 1;

factArr[2] = 2;

factArr[3] = 6;

 

function getFact(i:Number):Number {

        if (factArr[i]) {

                return factArr[i];

        }

        factArr[i] = i*getFact(i-1);

        return factArr[i];

}

//Если коротко - getFact возвращает факториал. Правильно возвращает. По возможности - запоминает расчёты.

 

var p = 23; //Явно простое число;

//Теорема Вильсона

trace (Boolean((getFact(p-1) + 1)%p == 0)); //false!

//Большое число - факториал 22 по версии виндового калькулятора

trace ((1124000727777607680001)/23); //48869596859895990000

//Но

trace ((1124000727777607680001)%23); //22!!!