2017-05-18 1 views
-1

Ecrire dans Scheme une fonction récursive er, et une fonction non récursive (basée sur do-loop) ei, qui prend comme argument le nombre de composantes n, et calculer la somme suivante (approximation de e) 1 + 1/1! + 1/2! + 1/3! + ... + 1/n !, n> 0Ecrire dans Scheme une fonction récursive pour calculer le nombre d'Euler e

+2

Ce ne serait pas une sorte de devoir, n'est-ce pas? –

+0

Bienvenue dans StackOverflow. Veuillez lire et suivre les consignes de publication dans la documentation d'aide. [sur le sujet] (http://stackoverflow.com/help/on-topic) et [comment demander] (http://stackoverflow.com/help/how-to-ask) s'appliquent ici. StackOverflow n'est pas un service de conception, de codage, de recherche ou de tutorat. – Prune

Répondre

0

J'ai une solution pour vous. J'espère que cela vous aidera!

((lambda (s) (s s -1 1 0)) 
(lambda (hep M f! euler-number) 
    ((lambda (s) 
     (if (= M 20) 
      (+ 0.0 euler-number) 
      (s s 1 1 (+ euler-number (/ 1 f!))))) 
    (lambda (hop N x! euler) 
     (hep hop (+ N 1) (* x! N) euler)))))