Programação Funcional e Concorrente com Scheme

notas de aula - Jerônimo C. Pellegrini
lista-de-strings
(if ( string ( car uma-lista ))
( seleciona-strings ( cdr uma-lista )
( cons ( car uma-lista )
lista-de-strings ))
( seleciona-strings ( cdr uma-lista )
lista-de-strings )))))
Resp. (Ex. 20) — Use um procedimento auxiliar recursivo combine, que implementa os
loops aninhados. Ele deve receber (start end n fun args), onde start e end são o valor
inicial e final do loop, e args é um acumulador com os índices calculados anteriormente.
( define combine
( lambda ( start end n fun args )
...))
( define with-combinations
( lambda (n k fun )
( combine 0 (+ (- n k) 1) n fun ’())))
Versão Preliminar
60
[ 27 de outubro de 2010 at 15:47 ]