間が開きましたが第三回です。
Rubyのプログラムで金額表記をしたいと思います。
例： 1234567890 > \1,234,567,890
前回同様、以下の要領でお願いします。
◎この質問は、プログラムの書き方がわからないのではなく「こんな書き方もできる」の募集です。
◎面白いプログラム、とても短いプログラム、トリッキーなもや勉強になるものは喜ばしいです。
◎このプログラムが役立つ場面は想像できません :-P
◎Rubyがダメな人はRuby以外でも可
※ 有料アンケート・ポイント付き質問機能は2023年2月28日に終了しました。
ログインして回答する
みんなの回答
-
凡
満足50pt
1回目、2回目を拝見させていただきましたが、回答者の皆さんの創意工夫がある書き方が楽しいですね。
プログラミング勉強中ということで参加させてください。
(私はRubyは勉強不足なのでPHPで書きます。)
PHPにはmoney_format関数というのがあるようですが、Cのライブラリ関数のstrfmonが使える環境でないと動かないです…。
稼動確認できませんでした。
<?php $str_before = '1234567890'; setlocale(LC_MONETARY,'japanese'); print money_format('%n', $str_before); ?>number_formatで千位毎にカンマを出力させるのが一番簡単じゃないでしょうか。
<?php $str_before = '1234567890'; print "\\" . number_format($str_before); ?>
仕方がないので無理やり力技で書いてみましたが、無駄にコードが長くなってしまいました。
ホントに意味がないですね…。
<?php $str_before = '1234567890'; if (strlen($str_before)!=0) { // 文字列が3で割り切れない場合、文字列先頭の余り分を配列にセット $str_mod = strlen($str_before)%3; if ($str_mod != 0) { $str_array[] = substr($str_before,0,$str_mod); $str_before = substr($str_before, $str_mod, strlen($str_before)); } // 文字列を3文字分ずつ区切って配列にセット for ($i=0;$i<strlen($str_before);$i+=3) { $str_array[] = substr($str_before, $i, 3); } // 配列の値を先頭から抜き出し、シングルクォートを追加 // 配列の最後の値の後にはシングルクォートが不要なので処理を分ける print '\\'; while (count($str_array)>1) { print array_shift($str_array); print ","; } print array_shift($str_array); } ?>ダラダラと書きましたが、なんだかとてもつまらない物になってしまいました。
Rubyistの方の回答に期待したいと思います。
(踏み台にでもなれたら本望です。)
-
taka4
-
- その他の回答を読む
taka4
この質問へのコメント
質問の情報
- 登録日時
- 2006-04-02 19:04:53
- 終了日時
- 2006-04-07 11:08:08
- 回答条件
- 1人3回まで
この質問のカテゴリ
この質問に含まれるキーワード
人気の質問
-
経団連が夫婦別姓（選択的）を提言しました。政府は、配偶者控除の廃止を志向しているようです。結婚制度を…
匿名質問者
4
2
-
０５７０ で始まる電話番号は、キャリアなどとの間でカケ放題などの契約をしていても、そのサービスは受け…匿名質問者1
-
オススメのシェイバー教えてください！ 以下の条件に近いシェイバーはあるのでしょうか。 1.髭が濃いため深…
Ryoya392
1
-
友人の解答と自身の解答で異なります。教えて頂けないでしょうか。 C社株式は，３年後に平均で1,000円にな…匿名質問者3
-
消費税制における輸出還付金が一部の輸出系大企業ばかりに有利に作用しているという内容の批判や解説のコラ…
minminjp20011
また面白い問題があったら出します。