.data .word
length: 22
.byte
numbers: 3, 1, 5, 7, 4, 4, 1, 0, 3, 5, 4, 4, 5, 3, 0, 1, 4, 4, 7, 5, 1, 3

.asciiz
correct: "Zahlenpalindrom erkannt"
missed: "kein Zahlenpalindrom"

.text

#########################################################################
#                    Ergaenzen Sie hier Ihre Loesung                    #
#########################################################################

la  $s0, numbers
xor $t0,$t0,$t0
lw  $t1, length
addi $t1, $t1, -1
loop:
sub $t3, $t1, $t0
slti $t3, $t3, 2
bne $t3,$0 palindrom
add $t3, $s0, $t0
lb  $t2, 0($t3)
add $t3, $s0, $t1
lb  $t3, 0($t3)
bne $t2, $t3, no_palindrom
addi $t0, $t0, 1
addi $t1, $t1, -1

j loop
#########################################################################

palindrom:
li $v0, 4
la $a0,correct
syscall
li $v0, 10
syscall

no_palindrom:
li $v0, 4
la $a0, missed
syscall
li $v0, 10
syscall