Dans l'esprit de Hello world! sans répétition

Écrivez un programme qui imprime la chaîne "le renard brun rapide saute par-dessus le chien paresseux" avec une nouvelle ligne en option. L'ensemble du programme ne doit répéter aucun caractère.

Notez que la chaîne à imprimer ne caractères répéter, de sorte que vous devrez contourner cette limitation en quelque sorte.

Notez que la condition gagnante est le concours de popularité , c'est -à- dire -à- la réponse la plus votée l' emporte.

Mise à jour: Pour rendre cela un peu plus facile, la répétition est autorisée mais vous devez essayer de la minimiser. Les programmes avec moins (ou pas) de répétition ont la priorité sur les programmes avec une certaine répétition.

Microsoft Word de 97 à 2003 (et certaines versions de Mac Word) - 10 caractères

Pas de répétitions, mais ne correspond pas tout à fait aux spécifications - 10 caractères:

=rand(2,1)

Production:

The quick brown fox jumps over the lazy dog.
The quick brown fox jumps over the lazy dog.

Correspond aux spécifications, autres que les majuscules et la ponctuation, une répétition - 10 caractères:

=rand(1,1)

Production:

The quick brown fox jumps over the lazy dog.

Les versions plus récentes de Microsoft Word utilisent les =rand.old(1,1)doublonsd et1 .

Il pourrait y avoir un moyen d'utiliser un champ {=SUM(3,-2)} comme entrée pour rand () mais mon installation a des problèmes avec les champs - à savoir, ils ne fonctionnent pas ...

"Bob" a confirmé que {=SUM(3,-2)}(avec une certaine difficulté) peut être utilisé pour remplacer le premier 1, mais =est répété ...

=rand({=SUM(3,-2)},1)

Si vous obtenez d'abord Word pour mettre à jour SUM, la sortie est:

The quick brown fox jumps over the lazy dog.

Sclipting - 36 caractères

덆둥긇굵늖꽫긆깲닷덮긂롦닲롸껂걪덖륰댲걯덦넬댢건늆넠닆굺뎒걤닶댬首坼

(attend une entrée vide)

Explication:

Push the string "the quick brown ,fo,x, jumps ove,r the lazy dog,"
덆둥긇굵늖꽫긆깲닷덮긂롦닲롸껂걪덖륰댲걯덦넬댢건늆넠닆굺뎒걤닶댬
Retrieve last character from the string (",")
首
Regular expression string-split
坼

Le résultat est la liste ["the quick brown ", "fo", "x", " jumps ove", "r the lazy dog", ""], qui est automatiquement concaténée en une seule chaîne pour la sortie.

Perl 6 (76 caractères, pas de double)

Le script (sera modifié par le logiciel de la carte, mais il y a En Space jusqu'à Thin Space et NL et LF et tab)

say　EVAL    lc q{<the Quiţk Brown fïX jUmpS ůvťɲ Tɨå ìšzY dOg>~&(127.CHR
x
43)}

• Il utilise EVAL (merci encore de le mettre en majuscule) et <foo bar> cite des mots qui prennent en charge tous les caractères d'espace spéciaux comme séparateurs de mots.
• say rejoint la liste des chaînes en utilisant l'espace, fonctionne bien ici :)
• Ensuite, j'utilise ~&127 et bit pour mélanger à ascii simple. Complication supplémentaire: 'Ŭ'.lcdevient 'ŭ'ce qui devient un sau lieu du rnécessaire. Ajouter 128 fois supplémentaires aide :)

Une version avec barre oblique inversée au lieu de caractères Unicode pour montrer qu'ils sont tous différents

say\x[3000]EVAL\x[9]lc q{<the\x[2003]Qui\x[163]k\x[2004]Brown\x[2005]f\x[EF]X\x[2006]jUmpS\x[2007]\x[16F]v\x[165]\x[272]\x[2008]T\x[268]\x[E5]\x[2009]\x[EC]\x[161]zY\x[200A]dOg>~&(127.CHR\x[0A]x\x[0D]43)}

Si vous voulez vérifier qu'ils sont tous uniques, utilisez ce script (j'avais l'habitude Qb"string"d'avoir des citations de base avec seulement des échappements antislash)

.say for 
Qb"say\x[3000]EVAL\x[9]lc q{<the\x[2003]Qui\x[163]k\x[2004]Brown\x[2005]f\x[EF]X\x[2006]jUmpS\x[2007]\x[16F]v\x[165]\x[272]\x[2008]T\x[268]\x[E5]\x[2009]\x[EC]\x[161]zY\x[200A]dOg>~&(127.CHR\x[0A]x\x[0D]43)}"
.comb.Bag.grep(*.value > 1).map: {.key.ord.base(16) ~ " $_"  }

Ou exécutez-le directement en utilisant

EVAL Qb"say\x[3000]EVAL\x[9]lc q{<the\x[2003]Qui\x[163]k\x[2004]Brown\x[2005]f\x[EF]X\x[2006]jUmpS\x[2007]\x[16F]v\x[165]\x[272]\x[2008]T\x[268]\x[E5]\x[2009]\x[EC]\x[161]zY\x[200A]dOg>~&(127.CHR\x[0A]x\x[0D]43)}"

PHP - 67 octets

<?echo$g^¶¥€¼½ˆ•.${~˜}=ÂÍåœÌýü¡¦Åþ¾’‹Ï†£‘ƲáºëÓâæݗߙ󖎸·³ø‰ï®ÜØÔ;

Copiez-collez, enregistrez en Latin-1 (Ansi).

Il s'agit d'un chiffrement xor à 7 octets, utilisant la chaîne ¶¥€¼½ˆ•pour le sel.

Un caractère répété: $.

Haskell, 71 caractères

map(\c->chr$mod(ord c)128)"tŨeఠquiţkĠbŲɯwnȠfѯxРjѵŭŰsܠůvťѲठѴѨѥਠlšzyଠɤկg"

Encore une autre solution modulo 7 bits.

Caractères répétés:

c 3
d 2
m 2
o 2
r 2
( 2
) 2
" 2

Golf pour la première fois avec Haskell; toute personne plus expérimentée dans la langue, n'hésitez pas à vous améliorer. Je voulais rendre la fonction anonyme sans point pour éviter d'avoir à mentionner deux fois une variable, mais je ne sais pas si ce serait un avantage net.

JS, 35

btoa("¶ªº'$nº0ú1驲ޮØ^¬òv")

(ouais ... la double citation est répétée. et la sortie est mauvaise. Ce n'est pas encore une réponse sérieuse.)

Script de lot: 7 octets

echo %1

Si le script est nommé hello.bat, saisissez-le sur la ligne de commande:

hello.bat "The quick brown fox jumps over the lazy dog"