文档章节

【SICP练习】11 练习1.17

NoMasp
 NoMasp
发布于 2015/09/08 21:48
字数 156
阅读 3
收藏 0


练习1.17

这道题中有2个需要我们自己先写出来的函数doublehalve,当然了,这都非常容易实现:

(define(double x)

       (+ x x))

(define(halve x)

       (/ x 2))

题目中要求我们设计一个类似于fast-expt的求乘积的过程,并且只用对数的步数。

(define(* x y)

       (cond ((= y 0) 0)

       ((even? y) (double (* x (halve y))))

       ((odd? y) (+ x (* x (- y 1))))))

我们继续来测试一下:

(*2 10)

;Value:20

(*3 60)

;Value: 180

版权声明:本文为 NoMasp柯于旺 原创文章,未经许可严禁转载!欢迎访问我的博客:http://blog.csdn.net/nomasp

本文转载自:http://blog.csdn.net/nomasp/article/details/43532713

NoMasp
粉丝 7
博文 334
码字总数 0
作品 0
镇江
程序员
私信 提问
【Kubernetes社区之路】如何优雅的cherry-pick

尽管Kubernetes拥有众多分支,但社区主要围绕在master分支进行开发。即便其他分支存在bug,通常也是先在master分支进行修复,然后再cherry-pick到其他分支。 软件开发不可避免的会出现bug,所...

恋恋美食
2019/11/22
36
0
利用echart 做以特定数值为分界线的图表

利用echart 做以特定数值为分界线的图表,下面的例子以1为分界线的例子 <script> var axisData = ["8","9","10","11","12","13","14","15","16","17","18"]; var yxisData = [0.26, 1.01, 1.......

tianyawhl
2016/05/16
163
0
jacob完成word转html功能及注意事项

1、在网上下载jacob-1.17-M2,里面包含jacob.jar,jacob-1.17-M2-x86.dll,jacob-1.17-M2-x64.dll以及docs文件夹, 2、把jar包放到项目的lib下,把相应操作系统的dll文件放到C:WINDOWSsystem32...

凯文加内特
2014/04/01
994
0
审核后采购订单修改单据明细补充

update jxddhz set dwbh='DWI00000053' where djbh='JHFYMA00030945 ' update jxddmx set djsn=16 where djbh='JHFYMA00030945 ' and djsn=15 insert into jxddmx select a.cgddh,a.cgddsort......

qvodnet
2017/06/21
0
0
AndoridSQLite数据库开发基础教程(7)

AndoridSQLite数据库开发基础教程(7) 为空表添加数据 开发者可以单击Data按钮,看到Students表中是没有数据的,创建好的Students表是一个空表。如图1.15所示。如果开发者想要添加数据,操作...

大学霸
2019/10/28
26
0

没有更多内容

加载失败,请刷新页面

加载更多

今日头条技术架构分析,看这篇就对了!

点击上方 "程序员小乐"关注, 星标或置顶一起成长 每天凌晨00点00分, 第一时间与你相约 每日英文 Anywhere, it is a good in the past, recall the number of times many, all would be ligh......

吧主
1分钟前
9
0
影响K8S Pod分配和调度策略的两大关键特性

在Kubernetes中有一个最复杂的调度器可以处理pod的分配策略。基于在pod规范中所提及的资源需求,Kubernetes调度器会自动选择最合适的节点来运行pod。 但在许多实际场景下,我们必须干预调度过...

RancherLabs
3分钟前
25
0
Linux笔记

Linux常用命令之chmod修改文件权限777和754 示例:chmod 777 /etc/squid 运行命令后,squid文件夹(目录)的权限就被修改为777(可读可写可执行)。...

owenzhang24
7分钟前
11
0
教你如何在CentOS7系统上安装postgreSQL11

本文教你如何在CentOS7系统上安装postgreSQL11。 1.添加PostgreSQL Yum存储库 sudo yum install https://download.postgresql.org/pub/repos/yum/11/redhat/rhel-7-x86_64/pgdg-centos11-11-......

Linux就该这么学
14分钟前
25
0
欧盟将禁止公共场所人脸识别:谷歌支持,微软反对

   来源:新浪、VB   近日,彭博社披露的一份欧盟人工智能“白皮书”草案显示,欧盟计划对人工智能开发者提出具有法律约束力的新要求,以确保现代科技的开发和使用符合道德规范。    ...

水果黄瓜
18分钟前
11
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部