BE3

BE3/pile.arm

+% INVERSER r0 et r1
+
         mov r0, #3
         mov r1, #1
         push r1
@@ -7,18 +9,12 @@
 
 @pile smw 0
 
-%Somme des n
-def somme(n):
-  if n == 0 :
-    return 0
-  else :
-    return n + somme(n - 1)
-
 % LA SOMME DES N
         
 @main   mov r0, #n
         mov r1, r0
         bl r7, somme 
+        mov r1, r0
 @end    b end
 
 @somme  cmp r1, #0
@@ -34,4 +30,19 @@ def somme(n):
 
 @zero   pop r1
         pop r7
-        b r7
\ No newline at end of file
+        b r7
+
+@pile smw 0
+
+% n!
+
+@prod   cmp r0, #0
+        beq fprod
+@mult   mov r6, r1
+        cmp r6, #0
+        beq fprod
+        add r1, r1, r
+        sub r6, r6, #1
+        b mult
+@fprod  b r7
+        
\ No newline at end of file