My Opera is closing 1st of March

Feature Not yet Implemented

Rarrrr

SICP Exercise 1.3

(define (abs x)
  (cond ((> x 0) x)
	((= x 0) 0)
	((< x 0) (- x))))

; Exercise 1.3
; Take three numbers and return the sum of
; the squares of the two larger numbers

(define (sq x)
  (* x x))

(define (sumqs a b c)
  (cond ((and (> a c) (> b c)) (+ (sq a) (sq b)))
        ))

(sumqs 5 6 1)

Exercise 1.5

Write a comment

New comments have been disabled for this post.

February 2014
S M T W T F S
January 2014March 2014
1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28