sicp

SICP练习1.6 1.16 解答

上一次看SICP没有做习题，这次就慢慢看，慢慢做题了。 效率比较低，很少抽空看看，这两个题不是一眼就看出结果的，所以写下。
·2015-10-21 11:33

SICP习题1.8

#langscheme ;;;SICPexecise1.8getthecuberoot (define(squarex) (*xx)) (define(cubex) (*xxx)) (define(crtx
lihenair·2015-10-15 15:00

win8.1安装SQL 2008错误:试图执行未经授权的操作

操作系统是win8.164位，因测试就在上面安装sqlserver2008r232bit的，在安装到ssisconfigactioninstallpostmsicpu64时候出现以下错误，试图执行未经授权的操作
zml_2015·2015-10-15 15:00

用service实现音乐播放器

MainActivity.javapackagecom.example.musicplayservice; importandroid.app.Activity; importandroid.content.Intent
kongchengjiumenghx·2015-10-06 09:00

torcs源码分析--(1)工程分析

berniwberniw2berniw3btdamnedhumaninfernoinferno2lliawloethrossparkletitalibs库client实现客户端uiconfscreenslearning有关神经网络的一些算法math一些数学和矩阵的算法musicplayer
bsxylj·2015-10-04 00:00

以两军问题为背景来演绎Basic Paxos

两军问题和BasicPaxos非常相似1） 通信的各方需要达成共识；2） 通信的各方仅需要达成一个共识；3） 假设的前提是信道不稳定，有丢包、延迟或者重放，但消息不会被篡改。
iunknown·2015-09-28 10:00

以两军问题为背景来演绎Basic Paxos

两军问题和BasicPaxos非常相似1）通信的各方需要达成共识；2）通信的各方仅需要达成一个共识；3）假设的前提是信道不稳定，有丢包、延迟或者重放，但消息不会被篡改。
iunknown·2015-09-28 10:00

SICP 习题 (2.30)解题总结 : Square-Tree

SICP习题2.30要求我们完成一个叫square-tree的过程，其作用和之前的square过程差不多，square过程是针对简单列表的，将列表中的所有元素求平方，然后返回新的平方数列表。
keyboardota·2015-09-27 14:05

SICP 习题 （2.29） 解题总结：二叉活动体

SICP习题2.29题目很长，实现起来有点繁琐，不过题目不难，花点时间还是容易完成的。
keyboardota·2015-09-27 14:36

SICP 习题 （2.28）解题总结：树状列表的遍历

SICP习题2.28的本质其实是树的遍历题目要求我们实现一个叫fringe的过程，fringe的英文意思是边缘，花边的意思，题目的意思其实就是要我们遍历一棵树，然后以列表的形式返回这棵树的所有叶子。
keyboardota·2015-09-27 14:34

SICP 习题 （2.27）解题总结：树状列表的遍历

SICP习题2.27又开始有些难度了，题目要求我们实现reverse的升级版deep-reverse，就是不仅要将一个列表的元素顺序倒过来，还要将列表中所有子列表的元素也倒过来。
keyboardOTA·2015-09-27 14:00

SlidingUpPanel

SlidingUpPanelSlidingUpPanelisaportofAndroidSlidingUpPaneltoXamarin.Android.Addanawesomedraggablepanelthatslidesupfromeitherthebottomortopofyourscreen.Useittoshowmoredetails,revealmusicplayercontrolso
抉择很难·2015-09-23 15:00

菜鸟-手把手教你把Acegi应用到实际项目中(2)

阅读更多菜鸟-手把手教你把Acegi应用到实际项目中(2)博客分类：AcegiAcegi项目管理BeanJSPUI上一篇是基于BasicProcessingFilter的基本认证，这篇我们改用AuthenticationProcessingFilter
1011729483·2015-09-21 16:00

菜鸟-手把手教你把Acegi应用到实际项目中(2)

阅读更多菜鸟-手把手教你把Acegi应用到实际项目中(2)博客分类：AcegiAcegi项目管理BeanJSPUI上一篇是基于BasicProcessingFilter的基本认证，这篇我们改用AuthenticationProcessingFilter
1011729483·2015-09-21 16:00

菜鸟-手把手教你把Acegi应用到实际项目中(2)

菜鸟-手把手教你把Acegi应用到实际项目中(2)博客分类：AcegiAcegi项目管理BeanJSPUI      上一篇是基于BasicProcessingFilter的基本认证，这篇我们改用AuthenticationProcessingFilter
1011729483·2015-09-21 16:00

关于Swift2.0提供的try catch异常捕捉的使用方法

=nilbackgroundMusicPlayer=AVAudioPlayer(contentsOfURL:url,error:&error)ifbackgroundMusicPlayer==nil{print
BlankSpace15·2015-09-18 23:40

[置顶] nomasp 博客导读：UWP、Android、Algorithm、Lisp

博客有多个专栏，分别是关于WindowsApp开发、UWP（通用Windows平台）开发、SICP习题解和Scheme语言学习、算法解析与LeetCode等题解、Android应用开发，而最近会添加的文章将主要是算法和
NoMasp·2015-09-17 12:00

IOS中的音频视频处理

AVAudioPlayer：使用简单，但是只能播放本地音频文件，不可以播放流媒体文件注意：加载本地音频文件的路径的时候，不可以使用 NSURL*url=[NSURLURLWithString:musicPath
风云baby·2015-09-15 10:00

oracle instant client package + plsql developer 安装和配

详细步骤如下： 1、下载oracleinstantclientbasicpackage,在oracle官网下载就可以，地址如
cddchina·2015-09-15 10:00

【SICP练习】17 练习1.23

练习1.23首先我们按照题目要求来写出相应的next函数，然后再修改find-divisor函数。(define(nextx)      (if(=x2)        3        (+n2)))(define（find-divisorntest-divisor）      (cond((>(squaretest-divisor)n)n)           ((divides?test
NoMasp·2015-09-08 21:00

【SICP练习】111 练习3.24

练习3-24原文Exercise3.24.Inthetableimplementationsabove,thekeysaretestedforequalityusingequal?(calledbyassoc).Thisisnotalwaystheappropriatetest.Forinstance,wemighthaveatablewithnumerickeysinwhichwedon’tne
NoMasp·2015-09-08 21:00

【SICP练习】4 练习1.8

如果对前面的内容理解透彻了，看到这个表达式就知道直接将y换成guess即可。(define(improveguessx)        (/(+(*guessguess))(*2guess))3))但是如果中写到这里就认为完成了那就错了，如果还是用书中的good-enough?的话，那也应该将guess的平方变成立方。在学习这一部分的过程中，我们可能要经常使用这些函数，而函数当然不用每次都去敲
NoMasp·2015-09-08 21:00

【SICP练习】21 练习1.27

练习1.27这道题的场景是在注释47中，博主更关心的问题是：（第三行）撞上能欺骗费马检查的值的概率有多少，居然会比什么宇宙射线造成计算机出差。后者个人感觉是永远不会发生的，前者倒是还有可能发生。希望把前者的概率算出来的童鞋将过程列出来啦！言归正传，题目的意思就是要去验算注释47中的那几个Carmichael，那就来code吧：(define(find-carmichaeln)  (define
NoMasp·2015-09-08 21:00

【SICP练习】85 练习2.57

练习2.57看到题目中的能处理任意项就赶紧这道题挺难的，同时也想到了前面学过但还没怎么用过的点参数。题目中要能求和还能求乘积。我们先来写求和的函数吧。(define(make-suma1.a2)(if(single-operand?a2)(let((a2(cara2)))(cond((=number?a10)a2)((=number?a20)a1)((and(number?a1)(number?a
NoMasp·2015-09-08 21:00

【SICP练习】79 练习2.51

    练习2.51通过书中前面的内容，我们知道below中来将框架分成上下两部分，而beside将框架分成左右两部分。因此，below定义如下：(define(belowpainter1painter2)  (let((split-point(make-vect0.00.5)))     (let((paint-top(transform-painterpainter2           
NoMasp·2015-09-08 21:00

【SICP练习】89 练习2.62

练习2.62前面已经遇到过了，union-set是用来取并集的。我们要通过多种情况来完成这个程序。(define(union-setset1set2)(cond((and(null?set1)(null?set2))'())((null?set1)set2)((null?set2)set1)(else(let((x(carset1))(y(carset2)))(cond((=xy)(consx(u
NoMasp·2015-09-08 21:00

【SICP练习】9 练习1.15

(define(cubex)(*xxx))(define(px)(-(*3x)(*4(cubex))))(define(sineangle)   (if(not(>(absangle)0.1))       angle       (p(sine(/angle3.0)))))大家自己将题目中的代码写入Edwin中，用trace可以追踪p的调用，这种功能在VisualStudio中都有，我也是最
NoMasp·2015-09-08 21:00

【SICP练习】133 练习3.64

练习3-64原文Exercise3.64.Writeaprocedurestream-limitthattakesasargumentsastreamandanumber(thetolerance).Itshouldexaminethestreamuntilitfindstwosuccessiveelementsthatdifferinabsolutevaluebylessthanthetoler
NoMasp·2015-09-08 21:00

【SICP练习】20 练习1.26

练习1.26这本书的练习好像很多都和某个人有关，不愧是一本经典著作，通过MIT大量的修修补补。下面我们进入正题吧，Louis的问题就在于计算了2次(expmodbase(/exp2)m)，如果是用的square，则只会计算一次。更何况在这多余的一次里，又是一个漫长的迭代。Lisp最吸引我的就是它的精巧优美了，能短则短吧。版权声明：本文为NoMasp柯于旺原创文章，未经许可严禁转载！欢迎访问我的
NoMasp·2015-09-08 21:00

【SICP练习】138 练习3.69

练习3-69原文代码 (define(triplesstu)(cons-stream(list(stream-cars)(stream-cart)(stream-caru))(interleave(stream-map(lambda(x)(cons(stream-cars)x))(stream-cdr(pairstu)))(triples(stream-cdrs)(stream-cdrt)(str
NoMasp·2015-09-08 21:00

【SICP练习】144 练习3.82

练习3-82原文Exercise3.82.Redoexercise3.5onMonteCarlointegrationintermsofstreams.Thestreamversionofestimate-integralwillnothaveanargumenttellinghowmanytrialstoperform.Instead,itwillproduceastreamofestimate
NoMasp·2015-09-08 21:00

【SICP归纳】5 泛型运算符

关于数据抽象，有两个很重要的思想。一是在构建一些水平的抽象障碍在这个系统中。用某些对象来代换这些单独使用的抽象屏障。二是当需要使用某种形式的数据对象时，往往可以由其他人来将其实现，而我们并不需要知道具体操作。这都是在数据抽象方面非常强大的编程方法。但是这还不足以完成一个真正复杂的系统。在这里的问题出在“其他人”，作者常举的例子是Georges。归结来说，有很多人都工作在这个系统上，但所有的这些设计
NoMasp·2015-09-08 21:00

【SICP练习】24 练习1.30

练习1.30这道题要求将一个递归的规程改成是迭代的，通过对递归版本的sum的观察得出以下变换形式：a—(nexta)other—(+(terma)other)博主英文不太好实在想不出什么好词语了。变换成迭代通俗点讲就是要将sum中最后一行的加号去掉，因为这个是消耗大量空间的根源。如果我们将a和other作为迭代中的产生，将这个过程展开即有：(sum-iteraother)(sum-iter(n
NoMasp·2015-09-08 21:00

【SICP练习】45 练习2.4

练习2.4直接运用对比的技巧就可以猜测出相应的cdr表示如下：(define(cdrz)   (z(lambda(pq)q)))但我们还是要按照题中要求用代换模型来检验。先来检验car的。(car(cons01))(car(lambda(m)(01)))((lambda(z)(z(lambda(pq)p)))  (lambda(m)(01)))((lambda(m)(01))(lambda(p
NoMasp·2015-09-08 21:00

【SICP练习】110 练习3.23

练习3-23原文Exercise3.23.Adeque(“double-endedqueue”)isasequenceinwhichitemscanbeinsertedanddeletedateitherthefrontortherear.Operationsondequesaretheconstructormake-deque,thepredicateempty-deque?,selectors
NoMasp·2015-09-08 21:00

【SICP练习】7 练习1.11

这种题目太像是数学题目了，不过拿到编程上又有一些的难度。我们先根据题目中的条件，写出类似于第25页最下面的变换规则。我们先列出如下内容：a--f(n-1) f(2) f(3) f(4) f(5)b--f(n-2) f(1) f(2) f(3) f(4)c—f(n-3) f(0) f(1) f(2) f(3)于是继而得出下式：a—a+2b+3cb—ac—b也就是说，当n=5时，a为f(4)，而根
NoMasp·2015-09-08 21:00

【SICP练习】69 练习2.40

练习2.40这道题要我们写一个传入一个整数n然后返回一个序对(i,j)的过程unique-pairs，然后用于上一页的prime-sum-pairs的定义。此时我们要注意在prime-sum-pairs中哪一段代码表达的是这个意思。没错，是flatmap函数。因此我们将其写入到unique-pairs中。(define(unique-pairsn)   (flatmap(lambda(i)  
NoMasp·2015-09-08 21:00

【SICP练习】150 练习4.6

练习4-6原文Exercise4.6.Letexpressionsarederivedexpressions,because(let(()…()))isequivalentto((lambda(…)))Implementasyntactictransformationlet->combinationthatreducesevaluatingletexpressionstoevaluatingcom
NoMasp·2015-09-08 21:00

【SICP练习】55 练习2.23

练习2.23这道题就有小小的难度了。(define(for-eachflst)   (cond((not(null?lst))          (f(carlst))          (for-eachf(cdrlst)))))如果用上前面经常用到的begin和if，这里还有另一种for-each实现。(define(for-eachflst)   (if(not(null?lst))  
NoMasp·2015-09-08 21:00

【SICP练习】71 练习2.42

练习2.42这道题曾经在C#中写过，但是写出来的代码却没有Lisp中的朴素。用了一大堆的数组和for循环。但是在这里，用car、cdr来构造就行了。我们按书中给出的步骤来一步一步求解这个问题。首先是棋局，就按书上的示意图，从上往下的来排皇后的位置。诸如此时书中皇后的位置为：’(63175824)。然后就是过程adjoin-position。rest-of-queens是在前k-1列放置k-1个
NoMasp·2015-09-08 21:00

【SICP练习】15 练习1.21

练习1.21这道题几乎没有难度，除非在把书中函数写入到Edwin中时输入错误。(smallest-divisor199);Value:199(smallest-divisor1999);Value:1999(smallest-divisor19999);Value:19999版权声明：本文为NoMasp柯于旺原创文章，未经许可严禁转载！欢迎访问我的博客：http://blog.csdn.net
NoMasp·2015-09-08 21:00

【SICP练习】105 练习3.5-3.6

练习3-5原文Exercise3.5.MonteCarlointegrationisamethodofestimatingdefiniteintegralsbymeansofMonteCarlosimulation.ConsidercomputingtheareaofaregionofspacedescribedbyapredicateP(x,y)thatistrueforpoints(x,y)i
NoMasp·2015-09-08 21:00

【SICP练习】125 练习3.56

练习3-56原文Exercise3.56.Afamousproblem,firstraisedbyR.Hamming,istoenumerate,inascendingorderwithnorepetitions,allpositiveintegerswithnoprimefactorsotherthan2,3,or5.Oneobviouswaytodothisistosimplytesteach
NoMasp·2015-09-08 21:00

【SICP练习】104 练习3.1-3.4

练习3-1原文Exercise3.1.Anaccumulatorisaprocedurethatiscalledrepeatedlywithasinglenumericargumentandaccumulatesitsargumentsintoasum.Eachtimeitiscalled,itreturnsthecurrentlyaccumulatedsum.Writeaproceduremak
NoMasp·2015-09-08 21:00

【SICP练习】73 练习2.44

练习2.44这一小节的内容真是太抽象了。这道题就是要我们来类比前面的right-split函数了。(define(up-splitpaintern)    (if(=n0)       painter        (let((smaller(up-splitpainter(-n1))))           (belowpainter(besidesmallersmaller)))))版权声
NoMasp·2015-09-08 21:00

【SICP练习】90 练习2.63

练习2.63这两段代码的区别在于第二段用了迭代，相信可以大大减少计算时间。那么还是先来测试第一小题。需要的代码大家先敲进去。然后来定义图2-16中的三棵树了。(definetree-1(make-tree7(make-tree3(make-tree1'()'())(make-tree5'()'()))(make-tree9(make-tree'())(make-tree11'()'())))) (
NoMasp·2015-09-08 21:00

【SICP练习】58 练习2.28

练习2.28这道题是要我们找出树的所有树叶，参考第73页下面的count-leaves，当遍历这个树的时候也会有这三种情况：元素为空，元素不成对，以及元素成对。根据这个关系可以写出fringe如下：(define(fringetree)   (cond((null?tree)‘())         ((not(pair?tree))(listtree))         (else(appe
NoMasp·2015-09-08 21:00

【SICP练习】108 练习3.21

练习3-21原文Exercise3.21.BenBitdiddledecidestotestthequeueimplementationdescribedabove.HetypesintheprocedurestotheLispinterpreterandproceedstotrythemout:(defineq1(make-queue)) (insert-queue!q1'a) ((a)a)
NoMasp·2015-09-08 21:00

【SICP练习】119 练习3.50

练习3-50原文Exercise3.50.Completethefollowingdefinition,whichgeneralizesstream-maptoallowproceduresthattakemultiplearguments,analogoustomapinsection2.2.3,footnote12.(define(stream-mapproc.argstreams)(if((
NoMasp·2015-09-08 21:00

【SICP练习】80 练习2.52

练习2.52在这道题上面的文字中就说到了用segments->painter提供线段表，这里的a小题的代码如下：(segments->painter(list(make-segment(make-vect0.00.0)                                      (make-vect1.01.0))                       (make-segm
NoMasp·2015-09-08 21:00
上一页 31 32 33 34 35 36 37 38 下一页
按字母分类： ABCDEFGHIJKLMNOPQRSTUVWXYZ其他