La tâche est simple. Écrivez un interprète pour la langue * .

Voici un plus gros lien vers le wiki.

Il n'y a que trois programmes * valides:

• * Imprime "Bonjour tout le monde"
•  *  Imprime un nombre aléatoire compris entre 0 et 2 147 483 647
• *+* Fonctionne pour toujours.

Le troisième cas doit être une boucle infinie selon les spécifications de cette question

Contribution:

• L'entrée peut être prise via n'importe quelle méthode d'entrée acceptable par nos règles d'E / S standard
• Ce sera toujours l'un des programmes ci-dessus

Production:

• Le premier cas doit imprimer exactement Hello World, avec ou sans saut de ligne de fin.
• Dans le second cas, si le maximum entier de votre langue est inférieur à 2 147 483 647, utilisez le maximum entier de votre langue
• Les premier et deuxième cas peuvent imprimer sur n'importe quelle sortie acceptable par nos règles d'E / S standard.
• Le troisième cas ne devrait donner aucune sortie.

Notation:

Comme il s'agit de code-golf , la réponse la plus courte, en octets, l'emporte.

* , 0 octets

Puisque * n'a aucun moyen de lire l'entrée, les règles par défaut permettent de spécifier que l'entrée doit être donnée en la concaténant sur le programme .

(... Je pense. Il y a une condition "au moins deux fois plus de votes positifs que négatifs" que je n'ai pas de représentant pour vérifier).

R , 69 octets

switch(scan(,""),"*"="Hello, World!"," * "=sample(2^31,1)-1,repeat{})

Essayez-le en ligne!

switchessaie de faire correspondre les arguments nommés et s'il n'y a pas de correspondance, sélectionne le premier sans nom après le premier, qui dans ce cas est la boucle infinie repeat{}.

Gelée ,  21  20 octets

ḊOSØ%HX’¤“½,⁾ẇṭ»¹Ḃ¿?

Un lien monadique acceptant une liste de personnages.

Essayez-le en ligne!

vL’... fonctionne également (voir ci-dessous).

Comment?

ḊOSØ%HX’¤“½,⁾ẇṭ»¹Ḃ¿? - Link: list of characters   e.g.: "*"        or  " * "    or  "*+*"
Ḋ                    - dequeue                          ""             "* "         "+*"
 O                   - to ordinals                      []             [42,32]      [43,42]
  S                  - sum                              0              74           85
                   ? - if...
                  ¿  - ...if-condition: while...
                 Ḃ   -    ...while-condition: modulo 2  0              0            1
                ¹    -    ...while-true-do: identity                                85
                     -                                  0              74           (looping)
        ¤            - ...then: nilad followed by link(s) as a nilad:
   Ø%                -    literal 2^32                                 2^32
     H               -    half                                         2^31
      X              -    random integer in [1,n]                      RND[1,2^31]
       ’             -    decrement                                    RND[0,2^31)
         “½,⁾ẇṭ»     - ...else: dictionary words        "Hello World"

Alternative

vL’... - Link: list of characters                 e.g.: "*"        or  " * "    or  "*+*"
 L     - length                                         1              3            3
v      - evaluate (left) as Jelly code with input (right)
       -                                                1^1            3^3          (3^3+3)^3
       -                                                1              27           27000
  ’    - decrement                                      0              26           26999
   ... - continue as above                              "Hello World"  RND[0,2^31)  (looping)

C (gcc) , 66 63 octets

Merci à attinat pour les -3 octets.

Je n'ai qu'à vérifier le deuxième caractère: si le LSB est défini, c'est un +(donc le programme est " *+*") et le programme boucle. Après cela, si c'est un NUL, le programme était " *" et nous affichons Hello World; sinon, il affiche une valeur aléatoire ("  * ", la seule autre option qui reste.)

f(char*s){for(s++;*s&1;);printf(*s?"%d":"Hello World",rand());}

Essayez-le en ligne!

Python 2 , 103 93 89 87 octets

Je combiné ma réponse plus tôt avec Chas Browns réponse et a obtenu quelque chose de quelques octets plus court.

Le nombre aléatoire sera compris entre 0 et 2 ** 31-1 inclus.

from random import*
i=input()
while'*'<i:1
print["Hello World",randrange(2**31)][i<'!']

Essayez-le en ligne!

Versions précédentes:

103 octets

from random import*
exec['print"Hello World"','while 1:1','print randint(0,2**31-1)'][cmp(input(),'*')]

93 octets

from random import*
i=cmp(input(),'*')
while i>0:1
print["Hello World",randint(0,2**31-1)][i]

Keg , -lp, -ir 30 26 25 24 20 19 octets

!1=[_“H%c¡“| =[~.|{

-1 octet utilisant des drapeaux

Essayez-le en ligne!

Historique des réponses

?!1=[_“H%c¡“| =[~.|{

Essayez-le en ligne!

Raccourci Hello Worlden chaîne de dictionnaire

!1=[_Hello World| =[~.|{

Essayez-le en ligne!

Je n'ai jamais cessé d'être étonné de la puissance de Keg. Crédits à l'utilisateur EdgyNerd pour un autre octet enregistré.

Versions antérieures

_!0=[Hello World|\*=[~.|{

Essayez-le en ligne!

Crédit à l'utilisateur A__ pour l'octet supplémentaire enregistré.

Ancienne version

?!1=[_Hello World| =[__~|{

Essentiellement, prend le programme d'entrée et:

• Vérifie si la longueur d'entrée est 1, imprimant "Hello World" si vrai
• Vérifie si le dernier caractère est un espace et imprime un nombre aléatoire
• Sinon, exécute une boucle infinie

Imprimez ensuite implicitement la pile.

?                               #Get input from the user
 !1=                            #Compare the stack's length to 1
    [_Hello World           #Push "Hello, World!" to the stack
                     | =        #See if top item is a space
                        [__~|{  #If so, generate a random number, otherwise, infinite loop.

4 octets économisés car le monde bonjour n'a pas besoin de ponctuation.

Essayez-le en ligne! Ancienne version

Essayez-le en ligne! Nouvelle version

Befunge-93 , 54 octets

~"*"-_~1+#^_"dlroW olleH">:#,_@.%*2**:*::*88:*`0:?1#+<

Essayez-le en ligne!

Annoté:

~"*"-                      _                ~1+                   #^_        "dlroW olleH">:#,_    @      .%*2**:*::*88:   *`0:             ?1#+<
Compare first      If equal, go right       Compare second       If equal,        Output          Exit    Modulo by 2^31   If less than      Add 1
character to       Otherwise, go left       character to       loop forever   "Hello World"                 and output     0, multiply     a random amount
'*'                and wrap around          -1 (EOF)                                                                         by 0            of times

Le caractère aléatoire n'est pas uniforme. À chaque incrément, il y a 50% de chances d'arrêter l'incrémentation.

Japt , 22/25 octets

La première solution est pour la spécification d'origine qui avait *<space>comme deuxième programme et l'autre est pour la spécification mise à jour qui l'a arbitrairement changé en <space>*</space>, avec merci à EoI pour le "correctif" suggéré.

Les deux lancent une erreur de débordement en entrant dans la boucle infinie du troisième programme mais, théoriquement, avec suffisamment de mémoire (que nous pouvons supposer aux fins du code-golf ), fonctionnerait pour toujours.

Å?¢?ß:2pHÉ ö:`HÁM Wld

Essayez le programme 1
Essayez le programme 2
Essayez le programme 3

Å?UÎ>S?ß:2pHÉ ö:`HÁM Wld

Essayez le programme 1
Essayez le programme 2
Essayez le programme 3

JavaScript (ES7), 66 octets

s=>s[1]?s<'!'?Math.random()*2**31|0:eval(`for(;;);`):'Hello World'

Essayez-le en ligne!(Bonjour le monde)

Essayez-le en ligne!(nombre aléatoire)

Essayez-le en ligne! (boucle infinie)

Gelée , 23 21 octets

OS¹Ḃ¿ịØ%HX’;““½,⁾ẇṭ»¤

Essayez-le en ligne!

Un lien monadique prenant un seul argument et revenant Hello World , un entier aléatoire de 31 bits ou bouclant à l'infini selon la spécification.

Toutes les options: * * *+*

Explication

O                     | Convert to codepoints
 S                    | Sum
  ¹Ḃ¿                 | Loop the identity function while odd 
     ị              ¤ | Index into the following as a nilad:
      Ø%              | - 2 ** 32
        H             | - Halved
         X            | - Random integer in the range 1..2**31
          ’           | - Decrease by 1 
           ;          | - Concatenated to:
            ““½,⁾ẇṭ»  |   - "", "Hello World"

Java (JDK) , 83 octets

s->{for(s=s.intern();s=="*+*";);return"*"==s?"Hello World":(-1>>>1)*Math.random();}

Essayez-le en ligne!

Python 2 , 91 89 88 octets

from random import*
def f(p):
 while'*'<p:p
 print['Hello World',getrandbits(31)][p<'!']

Essayez-le en ligne!

2 octets merci à Jonathan Allan ; 1 octet de thx à ShadowRanger .

PowerShell, 60 , 56 octets

switch($args){*{'Hello World'}' * '{random}*+*{for(){}}}

Jolie Version muet, la technique du golf seulement ici omettre Get-dans Get-Random.

UPD. Réduit à 56 octets en supprimant les guillemets, grâce à veskah !

• Essayez-le en ligne! (Bonjour le monde)
• Essayez-le en ligne! (nombre aléatoire)
• Essayez-le en ligne! (boucle infinie)

Perl 5 -p , 43 39 octets

$_=/ /?0|rand~0:/\+/?redo:"Hello World"

Essayez-le en ligne!

C # (Visual C # Interactive Compiler) , 71 octets

s=>{for(;s=="*+*";);return"*"==s?"Hello World":new Random().Next()+"";}

Essayez-le en ligne!

Rubis -n , 47 octets

puts~/ /?rand(1<<31):~/\+/?loop{}:"Hello World"

Essayez-le en ligne!

Wolfram Language (Mathematica) , 65 octets

#/.{"*"->"Hello World"," * "->RandomInteger[2^31-1],_:>0~Do~∞}&

Essayez-le en ligne!

Fusain , 30 octets

Ｗ№θ*Ｆ⁼θ*≔Hello Worldθ∨θＩ‽Ｘ²¦³¹

Essayez-le en ligne! Le lien est vers la version détaillée du code. Abuse le format d'entrée par défaut de Charcoal qui se divise en espaces s'il n'y a qu'une seule ligne, donc l'entrée de nombre aléatoire ressemble en fait à trois entrées. Explication:

Ｗ№θ*

Répétez pendant que la première entrée contient un *.

Ｆ⁼θ*

Si la première entrée est une *seule ...

≔Hello Worldθ

... puis remplacez-le par Hello World, provoquant ainsi la fin de la boucle. *+*n'est pas remplacé, ce qui entraîne une boucle infinie.

∨θ

Si la première entrée n'est pas vide, sortez-la.

Ｉ‽Ｘ²¦³¹

Mais s'il est vide, sortez un entier aléatoire dans la plage souhaitée.

Ajouter ++ , 78 octets

z:"Hello World"
`y
xR2147483647
x:?
a:"*"
b:" * "
c:"*+*"
Ix=a,Oz
Ix=b,O
Wx=c,

Essayez-le en ligne!

Explication

z:"Hello World"	; Set z = "Hello World"
`y		; Set y as the active variable
xR2147483647	; Set y to a random number between 0 and 2147483647
x:?		; Set x to the input
a:"*"		; Set a = "*"
b:" * "		; Set b = " * "
c:"*+*"		; Set c = "*+*"
Ix=a,		; If x == a then...
	Oz	;	...output z
Ix=b,		; If x == b then...
	O	;	...output y
Wx=c,		; While x == c then...
		;	...do nothing

Brachylog , 26 23 octets

l₃∈&hṢ∧2^₃₁-₁ṙw∨Ḥ⊇ᶠ³⁶tw

Essayez-le en ligne!

Prend le programme sous forme de chaîne dans la variable d'entrée et ignore la variable de sortie. Exploite fortement la garantie que l'entrée n'est que l'un des trois programmes valides: toute entrée de longueur trois se comportera comme " * "ou "*+*"selon que le premier caractère est ou non un espace, et toute autre entrée se comportera comme "*".

l₃                         The input has length 3
  ∈                        and is an element of something,
   &h                      and the input's first element
     Ṣ                     is a space
  ∈                        (if not, try some other thing it's an element of),
      ∧2^₃₁-₁              so take 2,147,483,647 and
             ṙw            print a random number between 0 and it inclusive.
               ∨           If the input's length isn't 3,
                Ḥ⊇ᶠ³⁶tw    print the 36th subsequence of "Hello, World!".

PHP , 51 octets

for(;'*'<$l=$argn[1];);echo$l?rand():'Hello World';

Essayez-le en ligne! (Bonjour le monde)

Essayez-le en ligne! (Nombre aléatoire)

Essayez-le en ligne! (Boucle infinie)

Prend le deuxième caractère d'entrée qui peut être '', '*'ou '+'. Dans le cas où '+'le '*'<'+'sera vrai et la boucle sera infinie, sinon, après la boucle, "Hello World" ou un nombre aléatoire est affiché. Le rand()produit automatiquement un nombre entre 0 et getrandmax()qui utilise défini RAND_MAXdans la bibliothèque C standard et par défaut est 2147483647sur la plupart des plates-formes / environnements, y compris TIO.

05AB1E , 21 octets

'*KgDi[ë<ižIL<Ω딟™‚ï

Essayez-le en ligne. (REMARQUE: la construction aléatoire est assez lente avec de grandes listes, donc cela peut prendre un certain temps avant que le résultat ne soit donné.)

Explication:

'*K           '# Remove all "*" from the (implicit) input
   g           # Get the length of what's remain (either 0, 1, or 2)
    D          # Duplicate this length
     i         # If the length is exactly 1:
      [        #  Start an infinite loop
     ë<i       # Else-if the length is 2:
        žI     #  Push builtin 2147483648
          L    #  Create a list in the range [1,2147483648]
           <   #  Decrease each by 1 to make the range [0,2147483647]
            Ω  #  Pop and push a random value from the list
               #  (after which the top of the stack is output implicitly as result)
     ë         # Else:
      ”Ÿ™‚ï    #  Push dictionary string "Hello World"
               #  (after which the top of the stack is output implicitly as result)

Voir cette astuce de la mine de 05AB1E (section Comment utiliser le dictionnaire? ) Pour comprendre pourquoi ”Ÿ™‚ïest "Hello World".

Pyth , 32 octets

It/Jw\*#;?tlJOhC*4\ÿ"Hello World

Essayez-le en ligne!

Explication (Python-ish)

I                                   # if 
  /Jw\*                             #    (J:=input()).count("*"))
 t                                  #                             - 1:
       #;                           #     try: while True: pass;except: break;
         ?                          # if (ternary)
           lJ                       #    len(J):
             O                      #     randInt(0,                    )
               C                    #                int(     , 256)
                *4\ÿ                #                    4*"ÿ"
              h                     #                                + 1
                    "Hello World    # else: (implicitly) print "Hello World"

APL (Dyalog Unicode) , 39 octets ^SBCS

Préfixe anonyme lambda.

{'+'∊⍵:∇⍵⋄' '∊⍵:⌊2E31×?0⋄'Hello World'}

Essayez-le en ligne!

{ "dfn"; ⍵est l'argument:

 '+'∊⍵: si plus est membre de l'argument:

  ∇⍵ queue recurse sur l'argument

 ' '∊⍵ si l'espace est membre de l'argument:

  ?0 flotteur aléatoire (0–1)

  2E31× échelle à (0–2³¹)

  ⌊ sol

 'Hello World' sinon retourner la chaîne

Commodore BASIC (VIC-20, C64, TheC64Mini etc.) - 170 tokenize BASIC octets

 0a%=32767:goS9:b$=leF(b$,len(b$)-1):ifb$="*"tH?"hello world
 1ifb$=" * "tH?int(rN(ti)*a%)
 2ifb$="*+*"tHfOi=.to1:i=.:nE
 3end
 9b$="":fOi=.to1:geta$:i=-(a$=cH(13)):b$=b$+a$:?a$;:nE:reT

Je pense que pour le faire plus précisément, je vais devoir me plonger dans le monde étrange du langage d'assemblage 6502, mais ceci est un premier projet.

Premier point, le INPUTmot - clé dans Commodore BASIC ignore les espaces blancs, donc la sous-routine à la ligne 9est un moyen rapide et sale d'accepter les entrées du clavier, y compris les espaces.

Deuxième point, les entiers Commodore BASIC ont une plage de 16 bits signés, donc -32768 à +32767 source - j'ai donc gardé le nombre aléatoire généré entre 0 et 32767 inclus

Roitelet ,143 135 octets

Je ne suis pas un bon golfeur ... Le RNG génère à chaque fois la même valeur car c'est un générateur de nombres pseudo-aléatoires.

Fn.new{|a|
import"random"for Random
if(a=="*+*"){
while(1){}
}else System.write(a[0]==" "?Random.new(9).int((1<<31)-1):"Hello World")
}

Essayez-le en ligne!

JavaScript, 63 octets, pas de récursivité infinie

s=>s[1]?Math.random()*2**31|eval("while(s>'!');"):'Hello World'

mauvais réseau donc pas de lien TIO