3 和 5 的倍数
作者:Eric Hodges
https://projecteuler.net/problem=1
列出10以下所有3或5的倍数,我们得到 3、5、6 和 9。这些倍数的总和是 23。
求 1000 以下所有 3 或 5 的倍数的总和。
源代码: prob001-eric256.pl
use v6; my $sum; for (1..^1000) -> $n { $sum+=$n unless $n % 5 and $n % 3}; $sum.say;
作者:Eric Hodges
https://projecteuler.net/problem=1
列出10以下所有3或5的倍数,我们得到 3、5、6 和 9。这些倍数的总和是 23。
求 1000 以下所有 3 或 5 的倍数的总和。
源代码: prob001-eric256.pl
use v6; my $sum; for (1..^1000) -> $n { $sum+=$n unless $n % 5 and $n % 3}; $sum.say;