You are here: Home Blog Comments

Personal tools

Document Actions

Comments

Up one level
100までの素数(キミならどう書く 2.0 - ROUND 1 -) by 最近のちょっ得 — last modified 2006-06-27 00:14
もう遅いか。うち着いたの45分ぐらいだもんな。。。 ルートnが必要だと思って、mathn.rb のヘルプ見たら、素数もあるじゃん。 あるものは使えばいいのさってことで、ヘルプそのまま。 require 'mathn' pp = Prime.new; pp.each {|x| break if x >...
キミならどう書く 2.0 - ROUND 1 by 西尾泰和のブログ — last modified 2006-06-26 23:56
Pythonでdefもifもwhileもforも使わずに1行(126文字)で作...
m4 by yamaya — last modified 2006-06-26 23:52

m4 で書いてみたです。
http://ya.maya.st/d/200606c.html#s20060626_1

キミならどう書く 2.0 - ROUND 1 by 西尾泰和のブログ — last modified 2006-06-26 23:42
おおっと、今知りました。(via 竹迫さん) キミならどう書く 2.0 - R...
[Perl][pugs] 100までの素数 Perl6 / pugs 版 by 酒日記 はてな支店 — last modified 2006-06-26 22:50
Perl6 (pugs) で動くようにしてみた。 #!/usr/bin/pugs my $max = @*ARGS.pop || 100; my @primes = (2); for (3..$max) -> $n { @primes.push($n) if @primes.before_incl:{ sqrt $n <= $_ }.all:{ $n % $_ }; } @primes.join(' ').say; sub all (@lis
マイナー過ぎるか by Anonymous User — last modified 2006-06-26 18:04

-- Lua
a={}
for i = 2, math.sqrt(100), 1 do
for j = i + i, 99, i do
a[j] = 1
end
end
for i = 2, 99, 1 do
if not a[i] then
print(i)
end
end

Brainf*ckで100までの素数を列挙してみるテスト by TAKESAKO @ Yet another Cybozu Labs — last modified 2006-06-26 17:45
キミならどう書く 2.0 - ROUND 1 - LL Ring の前哨戦として...
[Perl] 100までの素数 (キミならどう書く 2.0 - L.L. Ring) by 酒日記 はてな支店 — last modified 2006-06-26 14:30
http://ll.jus.or.jp/2006/blog/doukaku1/ http://d.hatena.ne.jp/t-akihito/20060625/1151227410 LL Ring のチケット発売今日からだ。買ってこなくちゃ。 List::MoreUtils から all と before_incl を使って、リスト操作っぽく書いてみた。List::MoreUtils は標準モジュー