2006-06-17から1日間の記事一覧

100までの整数から素数を列挙せよ…を Smalltalk-76 で

1977 年から、時空を越えてのエントリー。w "Smalltalk-76" limit ← 100. primes ← #() asStream. primes next ← 2. for% i from: (3 to: limit by: 2) do% [ isprime ← true. for% prime from: primes contents do% [ i \ prime = 0 ? [isprime ← false]].…

100までの整数から素数を列挙せよ…を Squeak の Smalltalk で

「100までの整数から素数を列挙せよ」:キミならどう書く 2.0 - ROUND 1 - ― Lightweight Language Ring まずはお約束から。 Integer primesUpTo: 100=> #(2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97) 愚直に。 (2 to: 100) s…