読者です 読者をやめる 読者になる 読者になる

yy_taroのとりとめのない落書き

メインフレームの導入・設計・構築ができるぐらいの知識があったりする。

SICP始めました 12

SICP十二日目

問題2.3前(P50)まで到達

まだまだ、序の口だが、一章の終わりの内容よりも抽象的な処理をするようになってきた。

問題2.1

( define ( make-rat n d )
 ( let ( ( g ( gcd n d ) ) )
  ( if ( < d 0 )
   ( cons ( / ( ( * -1 n ) g ) ( / ( * -1 d ) g ) ) )
   ( cons ( / n g ) ( / d g ) ) ) ) )

 

問題2.2

( define ( midpoint-segment seg )
 ( let ( ( start ( start-segment seg ) )
   ( end ( end-segment seg ) ) )
  ( make-segment
   ( average ( x-point start )
         ( x-point end ) )
   ( average ( y-point start )
         ( y-point end ) ) ) ) )

 

 

計算機プログラムの構造と解釈[第2版]

計算機プログラムの構造と解釈[第2版]