函数调用方案

时间:2017-11-30 02:44:31

标签: function scheme

我的方案代码中有两个函数,我想在输入用户给定列表后立即显示输出check_even和count_even。任何人都可以帮助我实现这一目标吗?我很擅长计划,我真的需要你的帮助。

这是我的代码:

(define (check_even lst)  #function for checking even
   (cond ((null? lst) '())
         ((even? (car lst)) (cons (car lst) (check_even (cdr lst))))
         (else (check_even (cdr lst)))))


(define (count_even list) #function for counting even
   (if (null? list)
    0
     ( + (if (even? (car list )) 1 0)
       (count_even (cdr list)))))

1 个答案:

答案 0 :(得分:1)

如何使用values?它将允许您返回多个值,如下所示:

(define (results lst)
  (values (count_even lst)
          (check_even lst)))

例如:

(results '(1 2 3 4 5 6 7 8 9 10))
=> 5
   '(2 4 6 8 10)