6 lines
312 B
Racket
6 lines
312 B
Racket
#lang racket
|
|
(define (rev lst) ; косвенно рекурсивная функция, вызывающая обращение списка
|
|
(define (reverse acc lst) ; явно рекурсивная функция
|
|
(if (null? lst) acc
|
|
(reverse (cons (car lst) acc) (cdr lst))))
|
|
(reverse '() lst)) |