RosettaCodeData/Task/Averages-Arithmetic-mean/Racket/averages-arithmetic-mean.rkt
2023-07-01 13:44:08 -04:00

6 lines
131 B
Racket

#lang racket
(require math)
(mean (in-range 0 1000)) ; -> 499 1/2
(mean '(2 2 4 4)) ; -> 3
(mean #(3 4 5 8)) ; -> 5