Revision as of 07:28, 18 February 2021 (view source) Not a robot (talk \| contribs) (Add 8086 assembly) ← Older edit		Revision as of 06:20, 20 February 2021 (view source) Drkameleon (talk \| contribs) No edit summary Newer edit →
Line 477: =={{header\|Arturo}}== <lang ~~arturo~~rebol>~~isPalindrome~~palindrome?: @($[seq)] -> seq = [reverse seq]▼ ▲<lang arturo>isPalindrome: @(seq) -> seq = [reverse seq] loop #(["abba" "boom" "radar" "civic" "great")] {'wrd [▼ print [wrd ": palindrome?" palindrome? wrd] ▲loop #("abba" "boom" "radar" "civic" "great") { ]</lang>▼ ~~print & + ": isPalindrome? " + [isPalindrome &]~~ } ▲</lang> {{out}} <pre>abba : ~~isPalindrome~~palindrome? true boom : ~~isPalindrome~~palindrome? false radar : ~~isPalindrome~~palindrome? true civic : ~~isPalindrome~~palindrome? true great : ~~isPalindrome~~palindrome? false</pre> =={{header\|AutoHotkey}}==

Palindrome detection (view source)