module Task4 =
    let rec delItems = function
    | a::b::xs -> a::delItems xs
    | xs -> xs

    printfn "%A" (delItems [-1 .. 10])
    printfn "%A" (delItems [-1 .. 11])
    printfn "%A" (delItems ['a';'b';'c';'d';'e'])