"血をもって書け。そうすればあなたは、血が精神だということを経験するだろう。"

Problem1

10未満の自然数のうち、3 もしくは 5 の倍数になっているものは 3, 5, 6, 9 の4つがあり、これらの合計は 23 になる。

同じようにして、1,000 未満の 3 か 5 の倍数になっている数字の合計を求めよ。

Haskell

main = print $ sum $ map hit [1..999]
hit::Integer->Integer
hit x=if ((x `mod` 3)*(x `mod` 5) == 0) then x else 0

内包表現使うと1行。haskellすげー。

main=print $ sum $ [x|x<-[1..999], (x `mod` 3)*(x `mod` 5)==0] 

C

#include <stdio.h>
int main(void){
  int i,j=0;
  for(i=0;i<1000;i++){  if(!(i % 3) || !(i % 5)){ j+=i; }  }
  printf("%d",j);
}

答えは233168になった。

一日一チベットリンク

北京五輪の聖火リレーが17日午後(日本時間同)、インドの首都ニューデリーで行われた。同国には急進派を含む約10万人の亡命チベット人が暮らし、中国政府のチベット政策に抗議するデモや妨害が予想されるため、当局は警官や対テロ部隊など約1万5000人の治安要員を動員する最高レベルの警戒態勢を敷いた