この記事は【Kuin Advent Calendar 2016】の21日目の記事です。
【記事中で紹介しているコードについて】
コンパイルが通らない場合など、不具合があれば、@tatt61880まで連絡いただけると助かります。よろしくお願いいたします。
{ 回文かどうか判定するプログラムです。 }
func main()
var strs: [][]char :: ["Palindrome", "level", "12/21", "しんぶんし", "たけやぶやけた", "回文", "ごまたまご"]
for i(0, ^strs - 1)
var str: []char :: strs[i]
do cui@print("「\{str}」は、回文\{@isParindrome(str) ?("です。", "ではありません。")}\n")
end for
end func
func isParindrome(str: []char): bool
for i(0, (^str / 2 - 1))
if(str[i] <> str[^str - 1 - i])
ret false
end if
end for
ret true
end func
「Palindrome」は、回文ではありません。 「level」は、回文です。 「12/21」は、回文です。 「しんぶんし」は、回文です。 「たけやぶやけた」は、回文です。 「回文」は、回文ではありません。 「ごまたまご」は、回文です。