Press CTRL+C or CMD+C to copy the selected text and close this dialog.
0 people like it.
Like the snippet!
Smallest divisible number between 1 to any number.
let maxDiv = 20
let mutable num = 1
let chkDiv num =
(fun x -> num % x = 0)
while not <| (chkDiv num)
do num <- num + 1
printfn "Number Found : %d" num
This web site is created using F# and Suave web server. It is hosted on
Azure and the source code is on GitHub. Contributions
The first version of fssnip.net has been created by
@tomaspetricek back in 2010.
This web site is a new, open-source and contribution-friendly version.