(define (f l)
  (cond ((or (null? l) (null? (cdr l))) '())
        (else (cons (+ (car l) (cadr l)) (f (cdr l))))))

(f '(1 2 3))