2012年12月7日金曜日

開発環境

『初めてのプログラミング 第2版』(Chris Pine 著、長尾 高弘 訳、オライリー・ジャパン、2010年、ISBN978-4-87311-469-9)の 6章(メソッドの詳細), 6.2(練習問題)怒った上司 を解いてみる。

その他参考書籍

怒った上司

コード(TextWrangler)

sample.rb

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

puts "What do you want?"
request = gets.chomp
puts "WHADDAYA MEAN \"#{request.upcase}\"?!? YOU'RE FIRED!!"

入出力結果(Terminal)

$ ./sample.rb
What do you want?
I want a raise
WHADDAYA MEAN "I WANT A RAISE"?!? YOU'RE FIRED!!
$

ちなみにJavaScriptの場合。

コード(TextWrangler)

var result = "";
var request = prompt("What do you want?",null);
result += "WHADDAYA MEAN \"" + request.toUpperCase() + "\"?!? YOU'RE FIRED!!";
$('#pre0').text(result);


pythonの場合。

sample.py

コード(TextWrangler)

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

request = input("What do you want?\n")
print("WHADDAYA MEAN \"{0}\"?!? YOU'RE FIRED!!".format(request.upper()))

入出力結果(Terminal)

$ ./sample.py
What do you want?
I want a raise
WHADDAYA MEAN "I WANT A RAISE"?!? YOU'RE FIRED!!
$

perlの場合。

sample.pl

コード(TextWrangler)

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

print "What do you want?\n";
chomp(my $request = <STDIN>);
print "WHADDAYA MEAN \"" . uc $request . "\"?!? YOU'RE FIRED!!\n";

入出力結果(Terminal)

$ ./sample.pl
What do you want?
I want a raise
WHADDAYA MEAN "I WANT A RAISE"?!? YOU'RE FIRED!!
$

0 コメント:

コメントを投稿