2011-08-01から1ヶ月間の記事一覧

JOI2011本選5番

kについて二分探索した後、その判定を頑張ってO(n)で出来るようにする。 #include <stdio.h> #include <utility> #include <set> #include <algorithm> #include <vector> #define MAX_V 1000100 using namespace std; int n; int ai[MAX_V],can[MAX_V],bi2ai[MAX_V]; pair<int,int> bi[MAX_V]; int ok(int k) { </int,int></vector></algorithm></set></utility></stdio.h>…

SuperCon2011に参加しました

2011年8月22日(月) 〜 26日(金)にかけて大阪大学豊中キャンパスで SuperCon2011にチームMKとして参加してきました。 今回の課題は「https://www.cp.cmc.osaka-u.ac.jp/supercon/naklon.html」。 リンクをクリックして表示されるのはSIZE=8のもの…

Haskellで数式をパースする

使い方 :load で読み込んだ後 myEquation "1+2*3" import Text.ParserCombinators.Parsec myDigit :: Parser Char myDigit = oneOf ['0'..'9'] myNumberString :: Parser String myNumberString = do c<-myDigit do cs <- myNumberString return (c:cs) <|> …

HaskellでHTMLをパースする

使い方 hoge.hsに下のコードを保存する。 runghc "hoge.hs" "target.html" ※ダブルクオーテーションは必要 このままでは空行が大量に含まれているので runghc "hoge.hs" "target.html" | sed '/^ *$/d' すると良い --sed '/^ *$/d' import Text.ParserCombin…