perl -e "$m=shift;for$n(2..$m){for(2..$n-1){if(!($n%$_)){$m--;last}}}print$m-1" 20
もちろんというか効率も行儀も悪い
Permalink | 記事への反応(0) | 08:58
ツイートシェア
ツイートシェア
10
