19/11/04 10:51:39.60 FzGFhotx.net
>>917 perl
なんの捻りもない
use List::Util qw(sum);
print join",",(grep{sum(split//)==12}(1..100));
19/11/04 10:51:39.60 FzGFhotx.net
>>917 perl
なんの捻りもない
use List::Util qw(sum);
print join",",(grep{sum(split//)==12}(1..100));