Guest User

Untitled

a guest
Dec 9th, 2018
87
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Scheme 0.10 KB | None | 0 0
  1. (sqrt((λ(l)((λ(p)((λ(m)(foldl * p m))(map(λ(x)(- p x))l)))(/(foldl + 0 l)2)))(list(read)(read)(read))))
Add Comment
Please, Sign In to add comment