Калькулятор Опции

[Наська]

Помогите! Ума не приложу как сделать икс в степени игрик?

[St@senk@]

 
Function Factorial(n:Integer):Integer;Assembler;
Asm
 MOV CX,[n]
 MOV AX,1
@@1:
 MUL CX
 LOOP @@1
End;

Вот это пожалуй самое быстрое из красивых реализаций факториала, которе я видел.


Добавлено через 3 мин.
кажется, я потихоньку научаюсь искать
факториал
Если делаешь калькулятор, то неплохо было бы добавить сюда проверку того, что а>=0, и напомню, что 0!=1