Lisp Scheme Part22 - 暇つぶし2ch

Lisp Scheme Part22 at TECH

363:デフォルトの名無しさん
08/06/07 14:44:27
>>347
　class Point
　 attr :x, :y
　 def initialize(x, y)
　 @x, @y = x, y
　 end
　
　 def updown?(a, b)
　 (@y > a * @x + b) ? "#t" : "#f"
　 end
　end
　
　a, b = 1, 5
　p = Point.new(1, 5)
　puts p.updown?(a, b)

次ページ

続きを表示

1を表示