let value = ref 0 

for i in [1..999] do 

    if (i % 3 = 0 || i % 5 = 0) then 

        value := value.Value + i 

​

​

printfn "%i" value.Value

​