pb en programmation scheme

pb en programmation scheme - Divers - Programmation

Marsh Posté le 28-03-2007 à 15:35:28    

Salut !!!
 
Je ne sais pas s il y a des gens callé en scheme sur ce forum... "Programmation strictement inutile bonjour ???"
 
Voila j'ai un souci avec ma fonction je n arrive pas a savoir si elle est valable !!!
 
Voici l'énoncé :
 
Donner une focntion Compte_Nbr qui compte les nombres d une liste L
 
Voici ce que j'ai fait :
 
(define (Compte_Nbr L)
(if (null? L) (+0)
(if (number? (car L)) (+1 (Compte_Nbre (cdr L)))
(Compte_Nbr (cdr L))
 
est ce correct ???
 
Merci !!!


---------------
Les toles ondulées, les vaches aussi.
Reply

Marsh Posté le 28-03-2007 à 15:35:28   

Reply

Marsh Posté le 28-03-2007 à 23:37:40    

J m'étais planté... Je pense que la c'est plus mieux good !!!
 
(define (Compte_Nbr L)  
(if (null? L) (0)  
(if (number? (car L)) (+1 (Compte_Nbre (cdr L)))  
(Compte_Nbr (cdr L))
 
Help please !!!

Reply

Marsh Posté le 29-03-2007 à 00:35:53    

Clemci a écrit :

J m'étais planté... Je pense que la c'est plus mieux good !!!
 
(define (Compte_Nbr L)  
(if (null? L) (0)  
(if (number? (car L)) (+1 (Compte_Nbre (cdr L)))  
(Compte_Nbr (cdr L))
 
Help please !!!


 
Bon déjà le scheme c'est fait exprès pour des gars comme toi qui débutent, donc ça sert ! T'imagine pas comment t'aurais galéré à faire ça en C.
 
Tu dis : "Donner une focntion Compte_Nbr qui compte les nombres d une liste L"
Donc la fonction que ta écrit doit surement marcher, pour cela ta qu'a la tester.


Message édité par Chronoklazm le 29-03-2007 à 00:37:02

---------------
Scheme is a programmable programming language ! I heard it through the grapevine !
Reply

Marsh Posté le 29-03-2007 à 00:40:32    

je veux bien mais le seul programme que je connaisse ne marche pas...
 
De mon coté je me suis renseigné et il paraitrai que c est juste !!!
 
J te remercie quand meme de me répondre !!!
 
++

Reply

Marsh Posté le 29-03-2007 à 09:17:53    

Oui sauf que tu as la forme cond plus pratique que le if
 
(define (Compte_Nbr L)  
  (cond((null? L) 0)
       ((number? (car L)) (+ 1 (Compte_Nbr (cdr L))))
       (else (Compte_Nbr (cdr L)))))
 
 


Message édité par Trap D le 29-03-2007 à 09:18:49
Reply

Marsh Posté le 14-05-2007 à 16:43:38    

Quelqu un pourrai m aider a config Dr Scheme svp...
 
Il marche tres bien quand j écris des fonctions du style :
 
(if (< 200 30)#t #f) et que je change les valeur directement.
 
Mais il ne fonctionne pas quand je fais des fonctions avec un define et une variable. Il me qui qu il n y a pas d erreur mais qq soit la fonction que j écris il me renvoie la variable...
 
Style :
 
(define (f1 x) (if (< x 0) #t #f))
 
si je rentre x=10 il me renvoie 10 (le con !!!)
 
- c est pour ca que j arrivais a rien !!! :'( -
 
Help please !!!

Reply

Marsh Posté le 04-07-2007 à 12:32:37    

Bonjour,
 
Je viens de rentrer
(define (f1 x) (if (< x 0) #t #f))  
(f1 10)
dans DrScheme (langage = R5RS)
 
Il me renvoie bien #f
 
Nicolas

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed