We use cookies to ensure you have the best browsing experience on our website. Please read our cookie policy for more information about how we use cookies.
  1. Prepare
  2. Functional Programming
  3. Introduction
  4. Filter Positions in a List
  5. Discussions

Filter Positions in a List

  • achraf_crispy
     + 0 comments

    Solution in Ocaml without using builtins function:

    let read_inputs () =
  let rec get_inputs liste =
    try
      let tmp = read_int () in
      get_inputs (liste @ [tmp])  (* Accumulate input into the list *)
    with
    | End_of_file -> liste
  in
  get_inputs [] ;;
  
 let rec filter_odd_position_element liste n = 
    if n <> List.length liste && (n mod 2) = 1 then
        Printf.printf "%d\n" (List.nth liste n);
    if n <> List.length liste then
         filter_odd_position_element liste (n + 1) ;;
let liste = read_inputs ();;
 filter_odd_position_element liste 0;;