Ruby でモナドの一例

m-hiyama.hatenablog.comこれを Ruby でやってみる。 countup_monad.rb class Countup def initialize(value, countup = 0) @value = value @countup = countup end attr_reader :value, :countup def fmap c = yield @value if c.instance_of?(Countup) Cou…

Haskell の「関数型問題解決法」を Ruby で

すごいHaskellたのしく学ぼう!作者:Miran Lipovača発売日: 2012/05/23メディア: 単行本(ソフトカバー)第10章。 ほぼ忠実な移植。 heathrow_to_London = [ [50, 10, 30], [5, 90, 20], [40, 2, 25], [10, 8, 0] ] make_section = ->(ary) {%i(A B C).zip(ar…

ABC184

https://atcoder.jp/contests/abc184 A: Determinant a, b, c, d = readlines.join.split.map(&:to_i) puts a * d - b * c B: Quizzes n, x = gets.split.map(&:to_i) str = gets.chomp str.each_char do |s| case s when "o" x += 1 else x -= 1 if x.nonze…

どう書く

オフラインリアルタイムどう書くの 会場や問題のリスト - 鍋あり谷あり ポーカー https://qiita.com/Nabetani/items/cbc3af152ee3f50a822f Suit = %W(S H D C) Rank = %W(2 3 4 5 6 7 8 9 10 J Q K A) def cards Suit.flat_map {|s| Rank.map {|r| s + r} }.…

ABC179

https://atcoder.jp/contests/abc179 A: Plural Form str = gets.chomp puts str + (str[-1] == "s" ? "es" : "s") B: Go to Jail n = gets.to_i dice = n.times.map {gets.split.map(&:to_i)} f = dice.each_cons(3).any? {|d1, d2, d3| d1[0] == d1[1] && …

ABC181

https://atcoder.jp/contests/abc181 A: Heavy Rotation n = gets.to_i puts n.even? ? "White" : "Black" B: Trapezoid Sum n = gets.to_i abs = n.times.map {gets.split.map(&:to_i)} puts abs.map {|a, b| (b - a + 1) * (a + b) / 2}.sum C: Collineari…

ABC180

https://atcoder.jp/contests/abc180 A: box n, a, b = gets.split.map(&:to_i) puts n - a + b B: Various distances gets xs = gets.split.map(&:to_i) puts xs.map {_1.abs}.sum puts Math.sqrt(xs.map {_1 * _1}.sum) puts xs.map {_1.abs}.max C: Cream…

ABC175

https://atcoder.jp/contests/abc175 過去問。 A: Rainy Season puts gets.chomp.each_char.chunk {|e| e == "R"} .map {|b, ary| b ? ary.size : 0}.max B: Making Triangle n = gets.to_i ls = gets.split.map(&:to_i) puts ls.combination(3).count {|li,…

ABC174

https://atcoder.jp/contests/abc174 過去問。 A: Air Conditioner x = gets.to_i puts (x >= 30) ? "Yes" : "No" B: Distance n, d = gets.split.map(&:to_i) coordinates = n.times.map {gets.split.map(&:to_i)} puts coordinates.count {|x, y| x * x + …

ABC167

https://atcoder.jp/contests/abc167 過去問。 A: Registration s = gets.chomp t = gets.chomp puts (t[0..-2] == s) ? "Yes" : "No" B: Easy Linear Programming a, b, c, k = gets.split.map(&:to_i) score = 0 if a <= k score += a k -= a if b <= k k …

Rubyで「分野別 初中級者が解くべき過去問精選100問」を解く

レッドコーダーが教える、競プロ・AtCoder上達のガイドライン【中級編:目指せ水色コーダー!】 - Qiita 全探索:全列挙 ITP1_7_B - How Many Ways? http://judge.u-aizu.ac.jp/onlinejudge/description.jsp?id=ITP1_7_B&lang=ja loop do n, x = gets.split.…

ABC166

https://atcoder.jp/contests/abc166 A: A?C puts (gets.chomp == "ABC") ? "ARC" : "ABC" B: Trick or Treat n, k = gets.split.map(&:to_i) sunuke = Array.new(n, 0) k.times do gets gets.split.each {|a| sunuke[a.to_i - 1] += 1} end puts sunuke.cou…

Ubuntu でロジクールの Bluetoothマウス M557 を使う

ペアリングしても、再起動すると自動で再接続しなくなってしまう。解決策: blueman をインストールする。 $ sudo apt install bluemanUbuntu 19.10 と18.04 LTS で確認済。 ※参考 https://forums.ubuntulinux.jp/viewtopic.php?id=17539

Linux でディスクアクセス速度を測定する

SSD のアクセス速度を測ってみた。メイン機の VAIO の外付け。下は VAIO 内臓の HDD で、これと比較する。 $ sudo hdparm -tT /dev/sdb /dev/sdb: Timing cached reads: 13626 MB in 1.99 seconds = 6839.35 MB/sec Timing buffered disk reads: 1182 MB in …

AGC033A

A - Darker and Darker TLE のコード H, W = gets.split.map(&:to_i) $field = H.times.map {gets.chomp} Area = W * H class Step @@count = 0 @@max_step = 0 def initialize(x, y, step = 0) @x = x @y = y @step = step @@count += 1 @@max_step = step …

ABC165

https://atcoder.jp/contests/abc165 30分くらい時間が経ってから始めた。A, B, C 3完。 A: We Love Golf gets.to_i a, b = gets.split.map(&:to_i) if (a % k).zero? puts "OK" else i = (a / k + 1) * k puts i <= b ? "OK" : "NG" end B: 1% x = gets.to_…

Ubuntu の Google Chrome でカラー絵文字を表示させる

Ubuntu は 18.04 LTS から「Noto Color Emoji」がインストールされている筈。 $ sudo apt install fonts-noto-color-emoji パッケージリストを読み込んでいます... 完了 依存関係ツリーを作成しています 状態情報を読み取っています... 完了 fonts-noto-colo…

ABC162

https://atcoder.jp/contests/abc162 過去問。 A: Lucky 7 n = gets.chomp puts n.include?("7") ? "Yes" : "No" B: FizzBuzz Sum n = gets.to_i result = 0 (1..n).each do |i| next if i % 3 == 0 || i % 5 == 0 result += i end puts result C: Sum of gc…

ABC161

https://atcoder.jp/contests/abc161 過去問。 A: ABC Swap a, b, c = gets.split.map(&:to_i) a, b = b, a a, c = c, a puts "#{a} #{b} #{c}" B: Popular Vote n, m = gets.split.map(&:to_i) votes = gets.split.map(&:to_i) limit = Rational(votes.inje…

Ruby で超簡単な CGI

エラーが出て全然わからない。 $ ruby test_webrick.rb [2020-04-01 22:31:56] INFO WEBrick 1.6.0 [2020-04-01 22:31:56] INFO ruby 2.7.0 (2019-12-25) [x86_64-linux] [2020-04-01 22:31:56] INFO WEBrick::HTTPServer#start: pid=15497 port=19681 [2020…

ABC159

https://atcoder.jp/contests/abc159 過去問。 A: The Number of Even Pairs 偶数から2個か奇数から2個取ればよい。 #x個の中から2個取る組み合わせの数 def c(x) return 0 if x == 0 || x == 1 x * (x - 1) / 2 end n, m = gets.split.map(&:to_i) puts c(n…

ABC158

https://atcoder.jp/contests/abc158 過去問。 A:Station and Bus s = gets.chomp puts (s == "AAA" || s == "BBB") ? "No" : "Yes" B:Count Balls n, a, b = gets.split.map(&:to_i) blue_ball = (n / (a + b)) * a remainder = n % (a + b) blue_ball += (…

パナソニックプログラミングコンテスト2020

https://atcoder.jp/contests/panasonic2020 過去問。 A:Kth Term ary = [1, 1, 1, 2, 1, 2, 1, 5, 2, 2, 1, 5, 1, 2, 1, 14, 1, 5, 1, 5, 2, 2, 1, 15, 2, 2, 5, 4, 1, 4, 1, 51] puts ary[gets.to_i - 1] B:Bishop HかWが 1 の場合を忘れていた。 h, w = g…

BunsenLabs Hydrogen apt error

$ lsb_release -a No LSB modules are available. Distributor ID: BunsenLabs Description: BunsenLabs GNU/Linux 8.9 (Hydrogen) Release: 8.9 Codename: bunsen-hydrogen W: 署名照合中にエラーが発生しました。リポジトリは更新されず、過去のインデック…

RubyGem "gdk3" が Linux Mint にインストールできない

Linux Mint 19.3 に gem "gtk3" をインストールしようとしてハマりました。Gem "gdk3" がインストールできない。正解はここ。 $ sudo apt install libgtk-3-devこれでした。

RubyGem "gobject-introspection" が Linux Mint にインストールできない

Linux Mint 19.3 に gem "gtk2" をインストールしようとしてハマりました。 Fetching gobject-introspection 3.4.1 Installing gobject-introspection 3.4.1 with native extensions Gem::Ext::BuildError: ERROR: Failed to build gem native extension. cu…

端末を特定のディレクトリで立ち上げる(Ubuntu)

$ gnome-terminal --working-directory=/path/to/dir

Linux の Thunderbird の移行

元のデータ保存先は 922vkyux.default で、これをコピーしてきて続けて使いたい。しかし default-release とか、よくわからないことになっている。Linux インストール時の .thunderbird/profiles.ini の内容は [Profile1] Name=default IsRelative=1 Path=o2…

キーエンス プログラミング コンテスト 2020

https://atcoder.jp/contests/keyence2020 過去問。 A h, w, n = readlines.map(&:to_i) puts (n / [h, w].max.to_f).ceil B imos法かと思ったが、ちがっていた。 n = gets.to_i data = n.times.map {gets.split.map(&:to_i)}.map {|x, l| [x - l, x + l]} r…

ABC151

https://atcoder.jp/contests/abc151 過去問。 A puts gets.chomp.succ B n, k, m = gets.split.map(&:to_i) sum = gets.split.map(&:to_i).inject(&:+) target = m * n - sum result = case when target < 0 then 0 when target > k then -1 else target en…