[Ocaml] nty element listy

[piti-n]

Mam napisać program do zwracania n-tego elementu z listy.

Kod: Zaznacz cały

let rec pomoc lista nty el= match lista with                   
  |[]-> 0                                                        
  |head::tail -> if (nty=el) then head else pomoc tail nty el+1;;

let nty lista nty= pomoc lista nty 1;; 

let lista =[3;2;1];;
let n=2;

nty lista n;;

i wypisuje mi 5

[Afish]

(el+1)

[piti-n]

I tak wypisuje głupoty

[Afish]

[piti-n]

heh dzięki. Trudna przesiadka z imperatywnych i obiektowych jezyków

[Afish]

Jeżeli nie musisz uczyć się konkretnie Ocamla, to polecam Haskella i świetną książkę do nauki tegoż:

Kod: Zaznacz cały

http://learnyouahaskell.com/

Tylko uprzedzam, że język (a właściwie jego zaawansowane mechanizmy) krzywi umysł