Ocamlについて、忘れないようにメモ・List.sortについて List.sort 比較関数 リスト;; 例 : let list = [5;2;5;1;6;8;0];; List.sort compare list;; (* 昇順 *) 自分で比較関数を定義すると次のようになる let my_compare x y = if x = y then 0 else if x …

問題リンク : B: 高橋くんと文字列圧縮 - AtCoder Beginner Contest 019 | AtCoder問題概要 : 英小文字からなる文字列が与えられる それらを問題文中に書かれている方法で圧縮しその結果を出力せよ解法 : 圧縮して出力するコード : let rec solve s i = if (…

問題リンク : A: 高橋くんと年齢 - AtCoder Beginner Contest 019 | AtCoder問題概要 : ３つの整数が与えられるのでそれらを昇順に並びかえたときの真ん中の値を出力せよ解法 : ソートして真ん中を出すコード : Printf.printf "%d\n" ( let list = Scanf.sca…

問題リンク : Alice and Bomb | Aizu Online Judge問題概要: 建物、人、爆弾があり、建物は２次元平面上の多角形として、人と爆弾は２次元平面上の点として与えられる 爆弾は爆発すると全方位に爆風が広がる 建物に爆風が当たるとそこでそこの爆風は遮られる…

立命館大学競技プログラミング合宿2015の初日、立命館大学セット 同じ大学の後輩と２人でチームを組んだ ( 折角の合宿なのだから他大学の人と組めという話だが、積極的にチーム編成に参加していかなかった結果 ) コンテスト中の流れは以下の通り開始 自分がA…

問題概要: H * W マスからなるフィールドがあり、各マスは次のいずれかである '.' : 空マス 移動可能 '#' : 障害物 移動不可能 'S' : ロボットが最初にいる場所 移動可能 ロボットは命令に従って移動する 命令は 'U','D','L','R' で表されるコマンドがいくつ…

問題概要 : 長さNの文字列がある 初期状態ではそのうちのいくつかに'A'か'B'が書かれていて、 その他は何も書かれていない これから何も書かれていない場所に'A'か'B'を書いていく ただし何も書かれていない場所全てに'A'か'B'を書い後、隣接する２つの場所…