Task 2003-6-3

情報科学概論　Aクラス　宿題 2003.6.3　解答例

2次方程式 2 x² + 3 x + c = 0 の解を，「解と係数の関係」の項式を利用して小数第2位まで求めよ．ただし，定数 c の値はコマンドライン引数として与えるものとする．

また，動作結果は次のようになるものとする．

実行例1
$ ruby Ruby-taskA-6-3-s0340**.rb 1

x = -0.50 and -1.00
実行例2
$ ruby Ruby-taskA-6-3-s0340**.rb 2

x = -0.75 + 0.66 i and -0.75 - 0.66 i

解答例

include Math c = ARGV[0].to_f a = 2.0; b= 3.0 aa = 2 * a root = b * b - 4 * a * c if root >= 0 x1 = ( -b + sqrt(root)) / aa x2 = ( -b - sqrt(root)) / aa printf "x = %1.2f and %1.2f\n", x1, x2 else re1 = -b / aa im1 = sqrt(-root) / aa im2 = -sqrt(-root) / aa printf "x = %1.2f + %1.2f i ", re1, im1 printf "and %1.2f - %1.2f i\n", re1, -im2 end

情報科学概論　Bクラス　宿題 2003.6.3　解答例

2次方程式 2 x² - 3 x + c = 0 の解を，「解と係数の関係」の項式を利用して小数第2位まで求めよ．ただし，定数 c の値はコマンドライン引数として与えるものとする．

また，動作結果は次のようになるものとする．

実行例1
$ ruby Ruby-taskB-6-3-s0340**.rb 1

x = 1.00 and 0.50
実行例2
$ ruby Ruby-taskB-6-3-s0340**.rb 2

x = 0.75 + 0.66 i and 0.75 - 0.66 i

解答例

include Math c = ARGV[0].to_f a = 2.0; b= -3.0 aa = 2 * a root = b * b - 4 * a * c if root >= 0 x1 = ( -b + sqrt(root)) / aa x2 = ( -b - sqrt(root)) / aa printf "x = %1.2f and %1.2f\n", x1, x2 else re1 = -b / aa im1 = sqrt(-root) / aa im2 = -sqrt(-root) / aa printf "x = %1.2f + %1.2f i ", re1, im1 printf "and %1.2f - %1.2f i\n", re1, -im2 end

Back