Aktywne Wpisy
![RazWDupeToNieHej](https://wykop.pl/cdn/c0834752/4282c3c3d0464ae08d5b95510e827fe13c4c39deed6012e756fdc967adbbffeb,q60.jpg)
RazWDupeToNieHej +28
![RazWDupeToNieHej - Szybko, szybko, pociąg ucieka, a ja mam zaległości w stosunku do k...](https://wykop.pl/cdn/c3201142/2ca01adbb0a46ea439b43f874d56662ccff63cee69a5fa1324cb242f22c10ff3,w150.jpg?author=RazWDupeToNieHej&auth=95363459e03d203533ce815dc525b680)
źródło: received_1057804495326630
Pobierz![MrMas](https://wykop.pl/cdn/c0834752/7fb5c80a5b7c856acaa199be66db49f240b2fa1aa05c69aeaa3b6d67de9a6a4b,q60.jpg)
MrMas +6
Ehh czemu natura nie obdarzyła mnie ładnymi piersiami, cale życie zmarnowane
#!$%@? baby nienawidze was wszystkich
#!$%@? baby nienawidze was wszystkich
Czy ponizsza funkcja zawsze terminuje?
open System
let number = Random().Next()
let rec guess (lower, upper) =
printfn "%A" (lower, upper)
if number >= lower && number <= upper then
let x = (lower + upper) / 2
if number > x then
guess (x, upper)
elif number < x then
guess (lower, x)
else x
else infinity |> int
let x = guess(Int32.MinValue, Int32.MaxValue)
źródło: comment_TH21muoauxNaCxhEHH1lOo1PCQs0VmRW.jpg
Pobierz@Felonious_Gru: podpowiem, ze ma to zwiazek z zakresem intow
let x = (lower + upper) / 2
bo w tym działaniu można łatwo wyjść poza zakres liczb, jeżeli x to integer
let (+.) x y = Checked.(+) x y