每周挑战307
本周的挑战由Mohammad S. Anwar 提出，旨在通过Python和Perl两种语言的练习，提升大家的编程能力。
挑战及我的解决方案
任务一：顺序检查
任务描述
给定一个整数列表
@ints。
请编写一个脚本，将该列表按升序重新排列，并返回与原始列表索引不同的索引值。
我的解决方案
这周的两个任务都比较直接，无需过多解释。我的方法是创建一个新的排序列表
sorted_ints(Perl中为数组)。然后迭代列表索引，比较原始列表和排序列表在相同索引位置的值是否一致。如果不一致，则将该索引添加到差异列表中。
def check_order(ints: list) -> list:
sorted_ints = sorted(ints)
diff_indices = []
for i in range(len(ints)):
if ints[i] != sorted_ints[i]:
diff_indices.append(i)
return diff_indices
示例
$ ./ch-1.py 5 2 4 3 1 [0, 2, 3, 4] $ ./ch-1.py 1 2 1 1 3 [1, 3] $ ./ch-1.py 3 1 3 2 3 [0, 1, 3]
任务二：查找字谜
任务描述
给定一个单词列表 @words。
请编写一个脚本，查找任何两个连续的单词，如果它们是字谜，则删除第一个单词并保留第二个单词。重复此过程，直到列表中不再存在字谜，并返回最终列表的元素个数。
我的解决方案
对于此任务，我创建了一个名为
sorted_words的列表，其中每个单词的字母都按字母顺序排序并忽略大小写。然后，我从列表的倒数第二个元素开始反向迭代。如果当前元素的排序形式与前一个元素相同，则表示找到一对字谜，我将字谜计数器anagrams加一。
最终结果为原始列表长度减去字谜对的个数。
def find_anagrams(words: list) -> int:
sorted_words = [''.join(sorted(word.lower())) for word in words]
anagrams_count = 0
for i in range(len(words) - 1, 0, -1):
if sorted_words[i] == sorted_words[i - 1]:
anagrams_count += 1
return len(words) - anagrams_count
示例
$ ./ch-2.py acca dog god perl repl 3 $ ./ch-2.py abba baba aabb ab ab 2
