.data
	n: .word 5
	v: 3, 5, 1, 4, 6
.text

modifica:
   	subu $sp,4  #adaugam tot in stiva
   	sw $fp,0($sp)   #$s1,$s0,$ra,$fp
   	addi $fp,$sp,4
   	subu $sp,20
	sw $s3,0($sp)
	sw $s2,4($sp)
   	sw $s1,8($sp)
   	sw $s0,12($sp)
   	sw $ra,16($sp)

	lw $s0,0($fp)   #*v
    	lw $s1,4($fp)   #n
    	beqz $s1,exitModif
	rem

	exitModif:
		lw $s2

exact_p_b8: #(x,y,c) exact y de c
	subu $sp,4
	sw $fp,0($sp)
	addi $fp,$sp,4
	subu $sp,16
	sw $s2,0($sp)
	sw $s1,4($sp)
   	sw $s0,8($sp)
   	sw $ra,12($sp)
	subu $sp,4
	sw $s3,0($sp)

	li $v0,0
	lw $s2,0($fp) #x
	lw $s1,4($fp) #y
	li $s0,0 	#c'
	loop:
		beqz $s2,done
		remu $s3,$s2,8
		divu $s2,$s2,8
		bne $s3,$s1,loop
		addu $s0,1
		j loop
done:
	lw $s2,8($sp) #c
	beq $s2,$s0,ok

	exitExact:
		lw $s3,0($sp)
		lw $s2,4($sp)
		lw $s1,8($sp)
   		lw $s0,12($sp).data
	n: .word 5
	v: 3, 5, 1, 4, 6
.text

modifica:
   	subu $sp,4  #adaugam tot in stiva
   	sw $fp,0($sp)   #$s1,$s0,$ra,$fp
   	addi $fp,$sp,4
   	subu $sp,20
	sw $s3,0($sp)
	sw $s2,4($sp)
   	sw $s1,8($sp)
   	sw $s0,12($sp)
   	sw $ra,16($sp)

	lw $s0,0($fp)   #*v
    	lw $s1,4($fp)   #n
    	beqz $s1,exitModif
	rem

	exitModif:
		lw $s2

exact_p_b8: #(x,y,c) exact y de c
	subu $sp,4
	sw $fp,0($sp)
	addi $fp,$sp,4
	subu $sp,16
	sw $s2,0($sp)
	sw $s1,4($sp)
   	sw $s0,8($sp)
   	sw $ra,12($sp)
	subu $sp,4
	sw $s3,0($sp)

	li $v0,0
	lw $s2,0($fp) #x
	lw $s1,4($fp) #y
	li $s0,0 	#c'
	loop:
		beqz $s2,done
		remu $s3,$s2,8
		divu $s2,$s2,8
		bne $s3,$s1,loop
		addu $s0,1
		j loop
done:
	lw $s2,8($sp) #c
	beq $s2,$s0,ok

	exitExact:
		lw $s3,0($sp)
		lw $s2,4($sp)
		lw $s1,8($sp)
   		lw $s0,12($sp)
   		lw $ra,16($sp)
		lw $fp,20($sp)
		addu $sp,24
		jr $ra

	ok:
		li $v0,1
		j exitExact







   		lw $ra,16($sp)
		lw $fp,20($sp)
		addu $sp,24
		jr $ra

	ok:
		li $v0,1
		j exitExact