Perl 每周挑战 245：三的倍数最大数
💡
原文英文，约400词，阅读约需2分钟。
📝
内容提要
本文是Perl Weekly Challenge第245周任务2的答案。任务要求给定一个大于等于0的整数数组，编写一个脚本返回由给定整数任意顺序连接而成的最大数，该数同时也是3的倍数。如果找不到符合条件的数，则返回-1。通过对输入数组进行降序排序，可以得到连接整数的最大组合。本文给出了Raku和Perl两种语言的解决方案。
🎯
关键要点
- 本文是Perl Weekly Challenge第245周任务2的答案。
- 任务要求给定一个大于等于0的整数数组，编写脚本返回由给定整数任意顺序连接而成的最大数，该数同时也是3的倍数。
- 如果找不到符合条件的数，则返回-1。
- 通过对输入数组进行降序排序，可以得到连接整数的最大组合。
- 给出了Raku和Perl两种语言的解决方案。
- Raku解决方案使用内置的组合例程生成各种可能性。
- 如果任何数字是3的倍数，则其数字的任何排列也是3的倍数。
- Raku程序的输出示例包括：981、9831、8760和-1。
- 本周没有足够的时间为Perl提供解决方案。
- 下周的Perl Weekly Challenge即将开始，参与者需在2023年12月10日23:59 BST之前提交答案。
🏷️
标签
➡️
