TSabc 発言

sugiです。

In message "[TSabc:43] 初心者向け言語の比較の参考に"
Mon, 8 Apr 2002 16:54:47 +0900
Ｙさ <saw@...> wrote:

> [お題]簡易足し算器
> [内容]入力された数字を合計し、表示する。
>  0が入力されるまで数字を受け付け、合計し続ける。
>  0が入力されるとそれまでの合計を表示する。

> [awkによる例]
> -----
> { if($1!=0) total+=$1; else exit; }
> END{ print "total = ", total; }
> -----
> ※ちなみに"簡易"なので入力が数値であるか等のチェックは省略


> どなたかその他の(スクリプト)言語による例をお願いいたします(^o^)/

Ruby の場合ってまだ無かったですよね。

#! /usr/local/bin/ruby

sum=0
sum+=(num=gets.to_f) until num==0
puts sum

これだとちょっと味気なかったので。

#! /usr/local/bin/ruby

sum=0
while 1
  print "数値を入力 > "
  break if (num=gets.to_f)==0
  sum+=num
end
puts "数値の合計は #{sum} です"

ついでにみようみまねで覚えた csh の場合、

#! /bin/csh

set num=1
set sum=0
while ($num != 0)
  echo -n "数値を入力 > "
  set num = $<
  @ sum = $sum + $num
end
echo "数値の合計は $sum です"

sh ってあまり知らないので、以前はたまに csh を使ってましたが、Ruby 
を使うようになってから、csh のスクリプトを書くことが無くなりました。

--
sugi