<rt id="bn8ez"></rt>
<label id="bn8ez"></label>

  • <span id="bn8ez"></span>

    <label id="bn8ez"><meter id="bn8ez"></meter></label>

    ivaneeo's blog

    自由的力量,自由的生活。

      BlogJava :: 首頁 :: 聯系 :: 聚合  :: 管理
      669 Posts :: 0 Stories :: 64 Comments :: 0 Trackbacks

    例子:求2的平方根

    Guess Quotient Average
    ??
    1 (2/1) = 2 ((2 + 1)/2) = 1.5
    ??
    1.5 (2/1.5) = 1.3333 ((1.3333 + 1.5)/2) = 1.4167
    ??
    1.4167 (2/1.4167) = 1.4118 ((1.4167 + 1.4118)/2) = 1.4142
    ??
    1.4142 ... ...

    一.給出一個scheme的過程
    (define?(sqrt-iter?guess?x)
    ??(if?(good-enough??guess?x)
    ??????guess
    ??????(sqrt-iter?(improve?guess?x)
    ?????????????????x)))
    二.改進猜的數(x除以猜的數和猜的數的平均值
    ???
    (define?(average?x?y)
    ? ??? (/?(+?x?y)?2))

    ??? (define?(improve?guess?x)
    ? ??? (average?guess?(/?x?guess)))
    三.如何得到比較適合的值.這里做了一個假設,猜的值的平方減去x不小于0.001
    ???
    (define?(good-enough??guess?x)
    ? ??? (<?(abs?(-?(square?guess)?x))?0.001))

    注:如何用內部過程來使用上面的部分:
    (define (sqrt x)
    ? (define (good-enough? guess)
    ??? (define (square)
    ????? (* guess guess))
    ??? (< (abs (- (square) x)) 0.001))
    ? (define (improve guess)
    ??? (define (average y)
    ????? (/ (+ guess y)
    ??? ?2))
    ??? (average (/ x guess)))
    ? (define (sqrt-iter guess)
    ??? (if (good-enough? guess)
    ??? guess
    ??? (sqrt-iter (improve guess))))
    ? (sqrt-iter 1.0))

    posted on 2006-07-29 22:12 ivaneeo 閱讀(592) 評論(0)  編輯  收藏 所屬分類: scheme-語言之母
    主站蜘蛛池模板: 日本在线高清免费爱做网站| 拍拍拍无挡视频免费观看1000| 四虎国产精品免费久久| 亚洲天天做日日做天天欢毛片 | 亚洲综合色一区二区三区| 精品无码无人网站免费视频| 99人中文字幕亚洲区| 久久WWW免费人成一看片| 亚洲日韩中文字幕天堂不卡| 日本片免费观看一区二区| 亚洲婷婷天堂在线综合| 中文字幕av无码无卡免费| 亚洲成a人片在线不卡一二三区| 午夜免费福利在线观看| 国产精品亚洲а∨天堂2021| 免费一级毛片不卡在线播放| free哆拍拍免费永久视频| 亚洲精品国产精品乱码视色| 99精品视频在线视频免费观看 | 亚洲av无码一区二区三区不卡| 日本一道本不卡免费| 亚洲国产午夜精品理论片| 性感美女视频在线观看免费精品| 日韩色视频一区二区三区亚洲| 亚洲熟女乱综合一区二区| 最近免费mv在线观看动漫| 亚洲精品美女在线观看播放| 小说专区亚洲春色校园| 国产亚洲美女精品久久久| 久久国产精品成人片免费| 亚洲砖码砖专无区2023| 亚洲情a成黄在线观看| 69视频免费观看l| 亚洲av无码专区在线观看下载| 国产午夜亚洲不卡| 久久99国产综合精品免费| 美女被暴羞羞免费视频| 五月天网站亚洲小说| 免费黄色网址入口| 国产高清不卡免费视频| 亚洲AV成人无码网天堂|