Ruby - 変換による相互乗り入れ(文字列を整数に変換(to_i))

初めてのプログラミング 第2版
Chris Pine (著) 長尾 高弘 (訳)

開発環境

• OS X Lion - Apple(OS)
• TextWrangler(Text Editor) (BBEditの機能制限無料版、light版)
• Script言語:Ruby

『初めてのプログラミング 第2版』(Chris Pine　著、長尾 高弘　訳、オライリー・ジャパン、2010年、ISBN978-4-87311-469-9)の 5章(変換による相互乗り入れ), 5.6(練習問題)大きい方がよい数 を解いてみる。

その他参考書籍

• 『プログラミング言語 Ruby』David Flanagan, まつもと ゆきひろ　著 、卜部 昌平　監訳、長尾 高弘　訳、オライリー・ジャパン、2009年、ISBN978-4-87311-394-4)
• Rubyクックブック ―エキスパートのための応用レシピ集

大きい方がよい数

コード(TextWrangler)

sample.rb

#!/usr/bin/env ruby1.9
# -*- coding: utf-8 -*-

print "好きな数は？ "
puts "#{gets.chomp.to_i + 1}の方がよかった。"

入出力結果(Terminal)

a$ ./sample.rb
好きな数は？ 10
11の方がよかった。
$

ちなみにJavaScriptの場合。

コード(TextWrangler)

var result = (parseInt($('#t0').val()) + 1) + "の方がよかった。\n";
$('#pre0').text(result);

好きな数:

pythonの場合。

sample.py

コード(TextWrangler)

#!/usr/bin/env python3.3
# -*- coding: utf-8 -*-

num = input("好きな数を入力: ")
print("{0}の方がよかった。".format(int(num) + 1))

入出力結果(Terminal)

$ ./sample.py
好きな数を入力: 10
11の方がよかった。
$

perlの場合。

sample.pl

コード(TextWrangler)

#!/usr/bin/env perl
use strict;
use warnings;
use utf8;
use 5.016;
binmode STDIN, ':utf8';
binmode STDOUT, ':utf8';

print "好きな数を入力: ";
chomp(my $num = <STDIN>);
print $num + 1 . "の方がよかった。\n";

入出力結果(Terminal)

$ ./sample.pl
好きな数を入力: 10
11の方がよかった。
$