Pseudocode Palindrom

/* palindrom = input SUGUS
output = SUGUS palindrom */

Start
input kata
a = 0
x = leghtofstring (kata) - 1
DOWHILE x > a
temp[x] = kata[a]
x = x + 1
ENDDO
IF kata = temp
print kata,"palindrom"
ELSE
print kata,"bukan palindrom"
ENDIF
END