.data
    FAT: .word 0
    N: .word 8
.text
.globl main
main:
    lw $t0, N
    addi $t1, $t0, 0
    li $t2, 1

    DO:
        addi $t0, $t0, -1
        mul $t1, $t1, $t0
    WHILE: bne $t0, $t2, DO

    sw $t0, N
    sw $t1, FAT

end: