Problem 257 - Project Euler 三角形の問題なんだが，それを忘れてしまうほど， 三角形の存在が薄い（三角形という条件は重要）． こういう問題は前にもあったような，なかったような．取り敢えず，解いたが， 理論的な保証が無いので，そこらへん，もうチョ…

書いてみた． 上位の方のソースを見ると2分探索で解いていた． まね． import Control.Monad import Text.Printf import Debug.Trace -- main part data Circle = C { x::Double, y::Double, r::Double} main = do (c:_) <- getList :: IO [Int] forM_ [1..c…

書いてみた． Haskellでは，面倒になることが予想されたので，C++で． 多分，標準的な解法だと思う．ただのDP. #include <iostream> #include <cstdlib> using namespace std; #define rep(i, n) for (int i = 0; i < (int)(n); i++) const int R = 50, C = 50, U = R*C+1; char</cstdlib></iostream>…