Anonymous user
Palindrome detection: Difference between revisions
m
→Icon and Unicon: header simplification
m (→Icon and Unicon: header simplification) |
|||
Line 658:
ENDDO
END</lang>
==
<lang Icon>procedure main(arglist)
every writes(s := !arglist) do write( if palindrome(s) then " is " else " is not", " a palindrome.")
Line 678 ⟶ 677:
return x
end</lang>
=={{header|Ioke}}==
| |||