Contents

#lang racket

(provide sum-of-squares square-of-sums difference)

(define (sum-of-squares n)
  (for/sum
      ([i (in-range (add1 n))])
    (* i i)))

(define (square-of-sums n)
  (let ([sum (for/sum
               ([i (in-range (add1 n))]) i)])
    (* sum sum)))

(define (difference n)
  (- (square-of-sums n) (sum-of-squares n)))

Version data entries

396 entries across 396 versions & 1 rubygems

Version	Path
trackler-2.2.1.180	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.179	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.178	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.177	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.176	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.175	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.174	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.173	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.172	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.171	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.170	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.169	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.167	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.166	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.165	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.164	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.163	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.162	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.161	tracks/racket/exercises/difference-of-squares/example.rkt
trackler-2.2.1.160	tracks/racket/exercises/difference-of-squares/example.rkt