http://projecteuler.net/problem=235 に対し、 とする。 s(5000) = -600,000,000,000 となるrを求めよ。答えは小数点以下12桁に丸めること。

すごい今更感。 普通にFizzBuzz まず普通にやるならこうではないだろうか。 # 正攻法？ for(i in 1:100){ if(!i%%3) cat("Fizz") if(!i%%5) cat("Buzz") if(i%%3 && i%%5) cat(i) cat("\n") } 15で割ったり3割りや5割りを2度繰り返すのはちょっと見苦しいの…

http://projecteuler.net/problem=191 ある学校では、きちんと出席し遅刻をしない生徒に対し賞金を出している。3日以上連続して欠席したり、1日より多く遅刻すると賞金は得られない。 n日間の各生徒の出席状況は、3つの文字、L(Late、遅刻)、O(On time、出席…