addi $s0, $0, 0  #Num0
addi $s1, $0, 1  #Num1
addi $s2, $0, 0  # i = 0
addi $t0, $0, 15 # Hasta 15

#log
addi $s3 $0, 0   # m = 0
addi $s4, $0, 1  # p = 1

forFibo:
 beq $s2, $t0, doneF # if i == 15,salta a done
 add $t1, $s0, $s1  # Num2 = Num0 + num1
 
 #Imprimir Num
 li $v0,4 
 la $a0,m 
 syscall 
 
 li $v0,1
 move $a0, $t1
 syscall
 
 li $v0,4
 la $a0,salto
 syscall
 
 move $s0, $s1
 move $s1, $t1
 
 addi $s2, $s2, 1   # incrementa i
 
 #Log
 
 while: 
 slt $t2, $s4, $t1  #(if p<numFibo) $t2 = 1 else =0
 beq $t2, $0, done  #if ($t2 == 0) cuando ya no cumple
 addi $s3,$s3,1     #m = m + 1
 sll $s4,$s4,1      #p = p * 2
 j while
 
 done:
 #Imprimir Num
 li $v0,4 
 la $a0,m2
 syscall 
 
 li $v0,1
 move $a0, $s3
 syscall
 
 li $v0,4
 la $a0,salto
 syscall
 
 li $v0,4
 la $a0,salto
 syscall
 
 j forFibo
 
doneF: