«前の日記(2013-07-28) 最新 次の日記(2013-08-04)» 編集

ToDo:

  • 99 時間配分をかえる (~12/31 あと280日)
  • 98 毎日目標をたてる (~12/31 あと280日)
  • 97 買物は行動を変えるもの・ことに限る(~12/31 あと280日)

ɥozɐʞıɥ


2013-08-01 8月なう [長年日記]

_ [買物][生活] 便座ノズル洗浄スプレー エアゾールタイプ 【HTRC2.1】


あまり家事をやらないヲレですがトイレ掃除は担当なのです。

_ [Clojure] Project Euler 3

(defn prim[n]

(loop [i 2 x n]

(cond (> i x) i

(zero? (mod x i)) (recur i (/ x i))

:else (recur (inc i) x))))



2002|09|10|11|12|
2003|01|02|03|04|05|06|07|08|09|10|11|12|
2004|01|02|03|04|05|06|07|08|09|10|11|12|
2005|01|02|03|04|05|06|07|08|09|10|11|12|
2006|01|02|03|04|05|06|07|08|09|10|11|12|
2007|01|02|03|04|05|06|07|08|09|10|11|12|
2008|01|02|03|04|05|06|07|08|09|10|11|12|
2009|01|02|03|04|05|06|07|08|09|10|11|12|
2010|01|02|03|04|05|06|07|08|09|10|11|12|
2011|01|02|03|04|05|06|07|08|09|10|11|12|
2012|01|02|03|04|05|06|07|08|09|10|11|12|
2013|01|02|03|04|05|06|07|08|09|10|11|12|
2014|01|02|03|04|05|06|07|08|09|10|11|12|
2015|01|02|03|04|05|06|07|08|09|10|11|12|
2016|01|02|03|04|05|06|07|08|09|10|11|12|
2017|01|02|03|04|05|06|07|08|09|10|11|12|
2018|01|02|03|04|05|06|07|08|09|10|11|12|
2019|01|02|03|
«前の日記(2013-07-28) 最新 次の日記(2013-08-04)» 編集