MIPS

.data
  A: .word 1,3,5,7,9,10,11,12,13,15
  i: .word 10
  j: .word 14
.text
   la $s1, A
   la $s2, j
   lw $t0, 0($s2) #go stavame j vo t0 za da mozime j&3
   andi $t0,$t0, 3 # andi e operacija za &
   sw $t0,0($s2)
   la $s3,i # i
   lw $t1, 0($s3) # pocetnata adresa za 1 vo t0
   addi $t2, $t1, 1 # i + 1
   sll $t2, $t2, 2 # i + 1  * 4 bidejki e word
   add $t3, $t2, $t1  # go dobivme i + 1
   srl $t4, $t1, 1  # i/2
   sll $t4, $t4 , 2 # morame i/2 * 4
   add $t5, $t4, $s1 # element od A+i/2
   lw  $s4, 0($t5) # vo s4 zapisi A[i/2]
   addi $t6, $zero, 4 # go istavame 4
   div $t0, $t6 # j%4
   mfhi $t6
   add $s4, $s4 , $t6 # A[i/2] + j%4
   sw  $s4, 0($t3) # A[i+1] = A[i/2] + j%4
   add $a0, $t0, $zero
   li  $v0, 1
   syscall

   lw $t2, 0($t3) #  i+1
   add $s5, $t2, $zero #  i+1 =)
   add $a0, $s5, $zero # argumentot
   li $v0, 1
   syscall
   li $v0, 10
   syscall