Back

情報科学概論 Aクラス 小テスト 2003.7.15 解答例


例題4を参考に,図1のような表示結果となるスクリプトを作成し,メールに添 付して提出すること.

図1 出力結果の図


解答例

bw = ["■", "□"]

for y in 0..15
  for x in 0..15
    if x + y == 7 || x + y == 23 || y == x + 8 || x == y + 8
      i = 0
    else
      i = 1
    end
    print bw[i]
  end
  print "\n"
end


情報科学概論 Bクラス 小テスト 2003.7.15 解答例


例題4を参考に,図1のような表示結果となるスクリプトを作成し,メールに添 付して提出すること.

図1 出力結果の図


解答例

bw = ["■", "□"]

for y in 0..15
  for x in 0..15
    if x + y == 15 || y == x
      i = 0
    else
      i = 1
    end
    print bw[i]
  end
  print "\n"
end


おまけ

次のスクリプトではどのような絵が描けるか,試してみましょう.

bw = ["■", "□"]

for y in 0..15
  for x in 0..15
    if (7.5 - x)**2 + (7.5 - y)**2 >= 25 && (7.5 - x)**2 + (7.5 - y)**2 <= 45
      i = 0
    else
      i = 1
    end
    print bw[i]
  end
  print "\n"
end

bw = ["■", "□"]

for y in 0..15
  for x in 0..15
    if x >= 3 && x <= 12 && y >= 3 && y <= 12
      if x >= 5 && x <= 10 && y >= 5 && y <=10
	i = 1
      else
	i = 0
      end
    else
      i = 1
    end
    print bw[i]
  end
  print "\n"
end


Back