- Code: Tout sélectionner
Define delvoid2(l)=
Func
Local i,s
string(l)→s
","&mid(s,2,dim(s)-2)→s
instring(s,"_")→i
While i>0
left(s,i-2)&mid(s,i+1)→s
instring(s,"_")→i
EndWhile
expr("{"&mid(s,2)&"}")
EndFunc
[Mini-Challenge #13] : DelVoid
Re: [Mini-Challenge #13] : DelVoid
Bon, j'en poste un pour la forme... mais il est moins bon :
-
BisamAdmin
Niveau 15: CC (Chevalier des Calculatrices)- Messages: 5665
- Inscription: 11 Mar 2008, 00:00
- Localisation: Lyon
- Genre:
- Calculatrice(s):→ MyCalcs profile
Re: [Mini-Challenge #13] : DelVoid
Pendant que j'y pense, une amelioration des codes de critor et d'Excale consiste a faire
a→b
plutot que b:=a
, ca fait 1 caractere de moins.MyCalcs: Help the community's calculator documentations by filling out your calculators info!
MyCalcs: Aidez la communauté à documenter les calculatrices en donnant des infos sur vos calculatrices !
Inspired-Lua.org: All about TI-Nspire Lua programming (tutorials, wiki/docs...)-
AdriwebAdmin
Niveau 16: CC2 (Commandeur des Calculatrices)- Messages: 14616
- Images: 1218
- Inscription: 01 Juin 2007, 00:00
- Localisation: France
- Genre:
- Calculatrice(s):→ MyCalcs profile
- Twitter/X: adriweb
- GitHub: adriweb
Re: [Mini-Challenge #13] : DelVoid
Si le but est de faire moins de chars:
- Code: Tout sélectionner
Define delvoid2(l)=
Func
Local i,r
{}→r
For i,1,dim(l)
ifFn(l[i]=0 or 0=0,augment(r,{l[i]}),0,r)→r
EndFor
EndFunc
-
ExcaleAdmin
Niveau 16: CC2 (Commandeur des Calculatrices)- Messages: 2955
- Images: 3
- Inscription: 10 Sep 2010, 00:00
- Genre:
- Calculatrice(s):→ MyCalcs profile
Re: [Mini-Challenge #13] : DelVoid
Pas mal - avec optimisation tu es a 80 caracteres, et critor a 76 ^^
Mais bon, vous etes tous deux gagnants dans votre technique, disons
Mais bon, vous etes tous deux gagnants dans votre technique, disons
MyCalcs: Help the community's calculator documentations by filling out your calculators info!
MyCalcs: Aidez la communauté à documenter les calculatrices en donnant des infos sur vos calculatrices !
Inspired-Lua.org: All about TI-Nspire Lua programming (tutorials, wiki/docs...)-
AdriwebAdmin
Niveau 16: CC2 (Commandeur des Calculatrices)- Messages: 14616
- Images: 1218
- Inscription: 01 Juin 2007, 00:00
- Localisation: France
- Genre:
- Calculatrice(s):→ MyCalcs profile
- Twitter/X: adriweb
- GitHub: adriweb
Re: [Mini-Challenge #13] : DelVoid
A troll, troll et demi...
- Code: Tout sélectionner
Define delvoid2(l)=
Func
Local i,r,a
{}→r
For i,1,dim(l)
{l[i]}→a
when(a=a,augment(r,a),a,r)→r
EndFor
EndFunc
-
BisamAdmin
Niveau 15: CC (Chevalier des Calculatrices)- Messages: 5665
- Inscription: 11 Mar 2008, 00:00
- Localisation: Lyon
- Genre:
- Calculatrice(s):→ MyCalcs profile
Re: [Mini-Challenge #13] : DelVoid
undef=undef
-
ExcaleAdmin
Niveau 16: CC2 (Commandeur des Calculatrices)- Messages: 2955
- Images: 3
- Inscription: 10 Sep 2010, 00:00
- Genre:
- Calculatrice(s):→ MyCalcs profile
Re: [Mini-Challenge #13] : DelVoid
grrr...
Je l'aurai, un jour, je l'aurai !
Cette fois, ça passe carrément !
Je l'aurai, un jour, je l'aurai !
- Code: Tout sélectionner
Define delvoid2(l)=
Func
Local i,r
{}→r
For i,1,dim(l)
when(l[i]={},0,augment(r,{l[i]}),r)→r
EndFor
EndFunc
Cette fois, ça passe carrément !
-
BisamAdmin
Niveau 15: CC (Chevalier des Calculatrices)- Messages: 5665
- Inscription: 11 Mar 2008, 00:00
- Localisation: Lyon
- Genre:
- Calculatrice(s):→ MyCalcs profile
Re: [Mini-Challenge #13] : DelVoid
Joli...
Je ne connaissais meme pas la finesse du dernier argument de When...
( when(Condition, trueResult [,falseResult] [,unknownResult]) )
Je ne connaissais meme pas la finesse du dernier argument de When...
( when(Condition, trueResult [,falseResult] [,unknownResult]) )
MyCalcs: Help the community's calculator documentations by filling out your calculators info!
MyCalcs: Aidez la communauté à documenter les calculatrices en donnant des infos sur vos calculatrices !
Inspired-Lua.org: All about TI-Nspire Lua programming (tutorials, wiki/docs...)-
AdriwebAdmin
Niveau 16: CC2 (Commandeur des Calculatrices)- Messages: 14616
- Images: 1218
- Inscription: 01 Juin 2007, 00:00
- Localisation: France
- Genre:
- Calculatrice(s):→ MyCalcs profile
- Twitter/X: adriweb
- GitHub: adriweb
Re: [Mini-Challenge #13] : DelVoid
En fait, j'ai mis When pour faire croire que c'est différent de IfFn... et donc pas du tout inspiré des posts précédents.
-
BisamAdmin
Niveau 15: CC (Chevalier des Calculatrices)- Messages: 5665
- Inscription: 11 Mar 2008, 00:00
- Localisation: Lyon
- Genre:
- Calculatrice(s):→ MyCalcs profile
Re: [Mini-Challenge #13] : DelVoid
Je suis d'accord avec cette proposition... jusqu'au jour où on pourra mettre des listes dans des listes.
-
ExcaleAdmin
Niveau 16: CC2 (Commandeur des Calculatrices)- Messages: 2955
- Images: 3
- Inscription: 10 Sep 2010, 00:00
- Genre:
- Calculatrice(s):→ MyCalcs profile
23 messages
• Page 2 sur 3 • 1, 2, 3
Retourner vers Mini-Challenges
Qui est en ligne
Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 1 invité