こんどはHaskellでやってみた。 solve :: Int -> [Int] -> Int -> Int solve price [] count = count solve price clist count | price >= (head clist) = solve (price - (head clist)) clist (count + 1) | otherwise = solve price (tail clist) count ma…

countSubstringSub :: String -> String -> Int -> Int countSubstringSub _ [] count = count + 1 countSubstringSub [] _ count = count countSubstringSub str sub count | (head str) == (head sub) = countSubstringSub (tail str) (tail sub) count | …

今日はここまで。文字列処理むずい。 (define (count-substring str sub) (define (count-substring-sub2 strl subl count) (if (null? subl) (+ count 1) (if (null? strl) count (if (char=? (car strl) (car subl)) (count-substring-sub2 (cdr strl) (cd…

関数型にも興味があって、HaskellとSchemeでどっち先にやろうか迷ってたんだけど、Schemeを先にやることにした。 (define (solve price clist count) (if (null? clist) count (if (>= price (car clist)) (solve (- price (car clist)) clist (+ count 1)) …

と書こうと思ったが、母集団の大きさが偶数のとき不成立と気付いたのでやめた。

しらなかった。e2fsckに-Dオプションがあるらしい。

場所：多摩川河川敷距離：4km参加者数：360名くらい記録：18分02秒、166位 来年から8kmとかなえ

ex1:7favいったらライトニングトークと言って9fav 【追記】まっちゃ139の目覚ましLTに立候補することになった件 - Pastalablog in はてな ex2:100favいったら禁酒と言って150fav越え ふぁぼったー / mayutan : 私もこの発言が100fav超えたら禁酒する

飛行機雲が残る場合、上空の湿度が高く、天候の悪化が予想されます。

って、とある偉いひとが言ってたんだけど、どうなんでしょうか。ちなみに僕はtumblrにもLDRにも縁がありません。

JOI(日本情報オリンピック)に引き続き、JMO(日本数学オリンピック)も本選進出決定しました。 第19回日本数学オリンピック(JMO)予選 結果通知 □□□□ 様 ***** あなたは第19回日本数学オリンピック予選において 7点 で Aランク の成績を獲得し、 予選に合格しま…

以下の二つの記事からひらめいた!!! インストールするだけでプレミアム会員と同じ扱いになるIE / Firefoxのプラグイン作ったらいいんじゃね？ ニコニコ・パートナーズプラグイン。でそれインスコすると、ブラウザからアマゾンで購入する全てのnonアフィリエ…

STLのソースの丸写しだが。 class Array def swap_at(i, j) self[i], self[j] = self[j], self[i] end def reverse_in(first, last) return if first == last last -= 1 while first < last swap_at(first, last) first += 1 last -= 1 end end def next_per…

今まで気付かなかったなんて。失態。 ラノベ部〈2〉 (MF文庫J)作者: 平坂読,よう太出版社/メーカー: メディアファクトリー発売日: 2009/01メディア: 文庫購入: 7人 クリック: 62回この商品を含むブログ (83件) を見るすぐ買わねば。

今日Debian台を起動したら、GRUB2がlinuxをロードしてくれなかった。 error: unknown command `initrd' Press any key to continue...とか言われた。以下が、"Debian GNU/Linux, linux 2.6.26-1-686"というメニューエントリの内容。 set root=(hd0,5) search…

D言語に興味もったので!試しに書いてみたよー! import std.cstream; import std.file; string c() { return "dout.writefln(\"Hello world\");"; } string p() { pragma(msg,"Hello, world!\n"); return "mixin(p());"; } void main() { mixin(p()); } D言語…

張っておく http://www.pixiv.net/ - 2009年1月23日 17:25 - ウェブ魚拓おまけ。drawrでも人気のようです。手書きイラストコミュニティ[drawr] - 手描きイラスト・日記 [drawr] 高橋 - 2009-01-23 10:42:45 [drawr] 赤芝 - 2009-01-23 09:43:59ユーザー数は…

ランダムに牌を選択し、和了の形ができているかどうかチェックするプログラム。10億回まわしてみた。 ソース #include <cstdio> #include <iostream> #include <vector> #include <algorithm> using namespace std; const char* tile_names[] = { "m1","m2","m3","m4","m5","m6","m7","m8","m9", "</algorithm></vector></iostream></cstdio>…

そういえば昔、こんな夢を見た。 ・・・やっぱ言うのやめた。古典の説話とか曰く、夢は人に話すと損するっていうし。

またしても二色コーディング(C++とJava)。今回45位だってさ！自分すごい！Rating 1489 => 1772 やったね！黄色昇格！ max Class.method point status 250 MagicWords.count 148.73 Passed System Test 500 SettingTests.countSites 288.61 Passed System Tes…

60thのみなさん！このブログ見てますか？やっほー！というわけで、今回は、いわゆるブログしか知らないひとに、Twitterというのを勧めてみたいと思います。Twitterは、一部のひとたちの間ではかなり使われているのですが、知らない人も多いでしょう。名前は…

アルゴリズムの違いが速度に明確に表れるわかりやすい例のひとつであるフィボナッチ数列を使って速度比較。気軽に多倍長が使える言語でないと、線形とlogの違いは見えづらい。 #!/usr/bin/ruby -Ku require 'matrix' def fib_recursive(n) case n when 0 ret…

ネット上には、中学3年くらいでもう凄い人々がいっぱいいる。簡潔にリストしておくことにした。 id:javascripter 中学3年。 JavaScriptとかRubyとかする人。 Web周りとかを主にやってるっぽい。 動的信者。 Mac使い。 今年度から勉強はじめてこれだから学習…

彼に☆貰った場合はトラバが来るぞーと体内に知らせて周ろうと思います。 もしid:qnighyにはてスタ付けられたら・・・ - Pastalablog in はてな 普通に共感した記事にもはてなスターつけるのでトラバ来なくても怒らないでくださいね。 はてなメッセージの設定…

最近、トラックバックして言及したいと思った記事に無意識のうちにスターつけてる気がした。新しい使い方ですね！

瞬殺。というかそうじゃないとまずいよね。 #include <climits> #include <cstdio> #include <vector> #include <algorithm> using namespace std; int main(int argc, char *argv[], char *envp[]) { #ifdef DEBUG FILE *in = stdin; FILE *out = stdout; #else FILE *in = fopen("input.txt", "</algorithm></vector></cstdio></climits>…

#include <cstdio> #include <vector> #include <algorithm> using namespace std; int gcm(int a, int b) { if(a < 0) a = -a; if(b < 0) b = -b; while(b>0) { int tmp = a % b; a = b; b = tmp; } return a; } class stick { public: int len0; int len1; stick *child0; stick *chil</algorithm></vector></cstdio>…

( )内は女性・・・みんな情報オリンピック受けるといいよ！

integrate(sqrt(1^x-2),x);の答えが と出たときは感動した。

Mathematicaに対抗しうる能力をもつMaximaというオープンソースの数式処理ソフトがあると聞いて。まず、MaximaとTeXmacsのインストール $ sudo aptitude install maxima maxima-doc maxima-emacs maxima-share maxima-test xmaxima wxmaxima $ sudo aptitude…