SICP 1.2.4 求幂

最新推荐文章于 2018-11-13 10:59:34 发布

原创最新推荐文章于 2018-11-13 10:59:34 发布 · 369 阅读

0 ·

CC 4.0 BY-SA版权

SICP 专栏收录该内容

77 篇文章

订阅专栏

本文介绍了使用递归实现快速幂算法的过程，包括定义函数、处理边界条件、判断偶数和奇数情况，并通过示例代码展示算法实现。

部署运行你感兴趣的模型镜像

(define (fast-expt b n)
  (cond ((= n 0) 1)
        ((even? n) (square (fast-expt b (/ n 2))))
        (else (* b (fast-expt b (- n 1))))))

(define (even? n)
  (= (remainder n 2) 0))

(fast-expt 3 3)

您可能感兴趣的与本文相关的镜像

Stable-Diffusion-3.5

图片生成

Stable-Diffusion

Stable Diffusion 3.5 (SD 3.5) 是由 Stability AI 推出的新一代文本到图像生成模型，相比 3.0 版本，它提升了图像质量、运行速度和硬件效率

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

_NMfloat_

关注关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
分享

复制链接

分享到 QQ

分享到新浪微博

扫一扫
举报

举报

专栏目录

sicp

03-20

《SICP》全称是《Structure and Interpretation of Computer Programs》，这是一本经典计算机科学教材，由Harvard大学的教授Harold Abelson和MIT的教授Gerald Jay Sussman合著，首次出版于1984年。这本书以其深入浅...

SICP 习题答案

05-16

《计算机程序的构造和解释》（SICP）是一本极具影响力的计算机科学教材，由Harold Abelson和Gerald Jay Sussman所著，MIT出版社出版。这本书以其深入探讨编程概念、程序设计方法以及计算机系统的工作原理而闻名。1-3...

参与评论您还未登录，请先登录后发表或查看评论

sicp练习1.17 只有加减法实现快速求幂

独立之人格，自由之思想

05-13

205

;double的功能是2*n (define (double n) (+ n n)) (double 5) ;*函数的功能是a乘以b (define (* a b) (if (= b 0) 0 (+ a (* a (- b 1))))) (* 3 4) ;havle-iter函数的功能是通过迭代获得n的一半的值,guess是...

SICP学习笔记 1.2.4 求幂

SavageGarden_Love的专栏

05-11

166

练习1.16 根据提示, a*b^n保持不变、使用a来保存结果，观察如下变换过程求b^100，(b n a) -->(b 100 a) -->(b^2 50 a) -->(b^4 25 a) 此时根据fast-expt的过程，应将25执行减1操作，如果保持a*b^n不变，则可有如下变换 -->(...

《计算机程序的构造和解释》学习笔记

04-05

1309

学习计划：总22节，每节1天，预计22天学习时间+4天练习时间，2013年4月6日～2013年5月2日 20130406============================== Emacs中使用mit-scheme 安装好mit-scheme之后，虽然自带的edwin(类emacs编辑器)也不错了，但是缺少了语法高亮多少还是有点不方便。这里主要是讲如何在emacs里面使用mit-

SICP习题笔记（第一章）

果壳中的宇宙

04-30

421

前面九题是熟悉用于熟悉scheme，不做记录第十题Ackermann函数的展开形式，在数学课本中有介绍 1.11 1 (define (f n) 2 (cond ((< n 3) n)

SICP习题 1.2.4 (求幂)

aoliupa8726的博客

11-23

129

(define (expte b n) (if (= n 0) 1 (* b (expte b (- n 1))))) ;(expte 2 200000);(expt 2 200000) (define (expta b n) (expta-iter b n 1)) (define (expta-iter b counter product) (if (=...

《SICP》习题第1章

四毛毛的博客

11-13

1337

本人做的SICP习题第1章，如有错误请指正，用的解释器是Racket 练习1.1 计算代码如下 ;; Exercise 1.1 #lang racket 10 (+ 5 3 4) (- 9 1) (/ 6 2) (+ (* 2 4) (- 4 6)) (define a 3) (define b (+ a 1)) (+ a b (* a b)) (= a b) (i...

SICP学习记录

alien10086的博客

05-18

538

第一章构造抽象过程1.1程序设计的基本元素1.基本表达形式：表示语言的最简单的个体 2.组合的方法：从简单的东西出发构造复合的元素 3.抽象的方法：为复合元素命名，并把它们当作单元操作1.1.1表达式456 （+ 4 5） 91.1.2命名（define size 2）1.1.3组合式求值（+ （+ 1 2）（* 1 2））（+ 3 2） 51.1.4复合过程（define （s

SICP 解题集

chinaliping的专栏

08-12

2201

源网址：http://sicp.readthedocs.org/en/latest/# SICP 解题集这个文档的目标是成为中文化的、完整的《计算机程序的构造和解释》一书的解题集。这个解题集的特色是：对于每道习题，除了习题答案之外，还给出习题的讲解和相关资料(如果有的话)；使用 MIT Scheme 作为编程环境，完全避免了代码不兼容的问题；所有代

SICP:SICP解决方案

06-22

《SICP：SICP解决方案》是针对结构与解释程序设计（Structure and Interpretation of Computer Programs，简称SICP）这本书的详细解答和实践指南。SICP是一本经典的计算机科学教材，由Harold Abelson和Gerald Jay ...

SICP中文第二版

07-19

SICP中文第二版SICP中文第二版SICP中文第二版SICP中文第二版SICP中文第二版

sicp-py-zh：【译】UCB CS61a SICP Python

02-05

- **读取-求值-打印循环**（REPL）：学习如何交互式地测试和调试代码。 - **内部表示**：了解如何将程序转换为机器可以理解的形式。 8. **符号处理**： - **操作符和表达式**：学习如何处理和操作符号，理解...

SICP 习题2.19 重写count-change 过程

NM的专栏

06-12

1185

(define (cc amount coin-values) (cond ((= amount 0) 1) ((or (< amount 0) (no-more? coin-values)) 0) (else (+ (cc amount (except-first-denomination coin-values)) (cc (

SICP 练习1.35使用不动点发寻找黄金分割律

NM的专栏

06-04

1073

前几个输出是书上介绍不动点法的几个样例(define tolerance 0.00001)(define (fixed-point f first-guess) (define (close-enough? v1 v2) (< (abs (- v1 v2)) tolerance)) (define (try guess) (let ((next (f guess)))

SICP 习题2.8 区间减法

NM的专栏

06-11

1014

我的想法是区间减法是a区间的每一个数减去b区间的每一个数，这些相减的结果在一个区间上。也就是x的下界-y的上界是最小的，x的上界-y的下界是最大的。其他所有结果都在这两个数之间。(define (add-interval x y) (make-interval (+ (lower-bound x) (lower-bound y)) (+ (upper-bound x) (upp

SICP 牛顿法求平方根

NM的专栏

05-31

928

(define (sqrt-iter guess x) (if (good-enough? guess x) guess (sqrt-iter (improve guess x) x)))(define (improve guess x) (average guess (/ x guess))) (define (average x y) (/ (+ x y) 2))(d

SICP 习题2.3 计算矩形面积和周长

NM的专栏

06-10

801

我是用两个点表示的一个矩形，矩形的左下方的点和右上方的点。还有一种方法可以用一个左下方的点，一个长，一个宽就可以了。建立抽象屏障就是要求每个表示方法都能求出一个矩形的长和宽，根据这两个信息，就可以求出矩形面积和周长。(define make-rect cons) (define s-rect car) (define e-rect cdr)(define make-point cons) (defi

SICP 习题1.36 使用不动点发寻找x^x = 1000的根

NM的专栏

06-04

796

修改fixed-point过程，在let里修改即可(define tolerance 0.00001)(define (fixed-point f first-guess) (newline) (display first-guess) (define (close-enough? v1 v2) (< (abs (- v1 v2)) tolerance)) (define (

SICP 换零钱问题

NM的专栏

06-01

772

书上提到了迭代的算法，想到了完全背包，但是lisp功底太差，实现不了。(define (count-change amount) (cc amount 5))(define (cc amount kinds-of-coins) (cond ((= amount 0) 1) ((or (< amount 0) (= kinds-of-coins 0)) 0) (