En tiempo de ejecución, siga solicitando una línea de entrada hasta que el usuario ingrese algo (que no sea una nueva línea vacía), es decir, no solo presione Entero OK. La salida o el resultado no es obligatorio ni está prohibido

Pseudocódigo 1

myform = new form("GUI")
myform.mytxt = new editfield("")
myform.ok = new button("OK")
repeat
  waitfor(myform.ok,"click")
until myform.mytxt.content <> ""

Pseudocódigo 2

LET TEXT = ""
WHILE TEXT = "" DO
  TEXT = PROMPT("")
ENDWHILE

Ejemplo 1

El programa se ejecuta e inmediatamente aparece un formulario con un solo campo de texto y un OKbotón.
El usuario hace clic en el OKbotón.
No pasa nada.
El usuario pega "hola mundo" en el campo de texto y hace clic en el OKbotón.
El programa termina.

Ejemplo 2

Se llama a la función e inmediatamente muestra una línea en blanco y un cursor parpadeante.
El usuario presiona Enter.
El cursor se mueve una línea hacia abajo.
El usuario presiona Enter.
El cursor se mueve una línea hacia abajo.
El usuario presiona La PPCGEnter
función vuelve.

TI-BASIC, 2 bytes

:Prompt X

TI-BASIC hace esto automáticamente. Una vez que se da entrada, se cerrará.

Aquí hay un GIF:

Mire el recuento de la entertecla en el historial de pulsaciones de teclas. Creado con TI-SmartView CE y ezgif.com .

Python 3 , 18 bytes

while''==input():0

Pruébalo en línea!

sed, 4

/./q

Espera una línea de entrada que tiene 1 o más caracteres, luego se cierra.

Pruébalo en línea . Pero funciona mejor en un shell vivo:

sed '/./q'

JavaScript, 37 22 17 bytes

while(!prompt());

while(!prompt());

Explicación

La whilepalabra clave inicia el whileciclo. En la condición del bucle, !prompt()pide entrada y verifica si se da o no. Si no se proporciona, se ejecuta el cuerpo del bucle, que en nuestro caso está vacío, entonces el intérprete vuelve a la condición del bucle. El mismo proceso ocurre una y otra vez hasta que el usuario da la entrada.

Java, 55 bytes

void f()throws Exception{while(System.in.read()==10);}}

Si recuerdo correctamente (ha pasado un tiempo desde que he estado activo en PPCG), mi programa puede ser simplemente una función.

Esto es específico del sistema; solo funciona en sistemas donde el carácter de fin de línea es una nueva línea. Si el carácter de fin de línea es en cambio un retorno de carro, reemplace 10con 13. En Windows, esto no funciona, como lo es el final de línea en Windows \r\n.

Esto hace uso del hecho de que puedo leer directamente System.in.

HTML5, 33 22 bytes

<form><input required>

<form><input required>

Explicación

los required atributo en <input>hace que el navegador informe al usuario "este campo es obligatorio" -sort-of-message, si no ingresan un valor. Sin embargo, cuando ingresan un valor, el valor se envía a la URL del actionatributo del <form>(que en nuestro caso es el archivo actual, ya que no hemos especificado ningún valor explícitamente).

Esto se probó en la última versión de Google Chrome (versión 55.0). Puede funcionar en otros navegadores y versiones.

Jalea , 3 bytes

ɠṆ¿

No hay mucho que ver en TIO, me temo.

Pruébalo en línea!

Cómo funciona

Este es un programa niládico, lo que significa que no requiere argumentos de entrada. El argumento implícito y el valor de retorno son ambos 0 en este caso.

¿(while) es un rápido que muestra dos enlaces de la pila de enlaces: una condición ( Ṇ) y un cuerpo.

Ṇes un átomo monádico: plano lógico NO. Si el valor de retorno anterior es falso (aquí, 0 o una cadena vacía), devuelve 1 y se llama al cuerpo.

ɠes un átomo niládico; lee una línea sin formato de STDIN y devuelve el resultado.

Una vez que ɠlee una línea no vacía, Ṇdevuelve 0 y salimos del bucle.

Pyth , 3 bytes

W!w

Pruébalo en línea!

Traducido a Python:

while Pnot(input()):
 pass

brainfuck , 26 bytes

+[>,----------[[-]<[-]>]<]

Pruébalo en línea!

Perl 5, 8 + 1 (-p o -n bandera) bytes

/./&&die

Toma datos de stdin y muere tan pronto como la expresión regular coincide con cualquier cosa, excepto una nueva línea.

C, 52 bytes , 33 bytes , 29 bytes

-19 bytes gracias a Justin

-4 bytes gracias a Christoph

main(){while(getchar()==10);}

10 es igual a '\ n' - En caso de que esto no sea obvio.

Bash, 51 bytes (39 sin "#! / Bin / bash")

Es la primera vez que participo en PPCG, así que no seas grosero; D

#!/bin/bash
read a
while [ -z "$a" ]
do
read a
done

Java , 128 126 bytes

2 bytes gracias a Kevin Cruijssen.

import java.util.*;class a{public static void main(String[]a){for(Scanner s=new Scanner(System.in);s.nextLine().isEmpty(););}}

Pruébalo en línea!

C # (.NET Core) , 66 bytes

class C{static void Main(){for(;System.Console.ReadLine()!="";);}}

Pruébalo en línea!

-6 bytes gracias a raznagul.

QBasic 4.5, 15 bytes

INPUT a$:IF a$=""THEN RUN

Pide entrada, luego verifica si se le dio alguna. Si no, RUNreinicia el programa.

Rubí, 13 bytes

gets until/./

Desearía getstomar un argumento Regexp.

R, 27 24 23 22 bytes

while(!sum(scan()^0))t

Toma la entrada de stdin y repite siempre que la entrada sea de longitud 0. Corte algunos bytes debido a Jarko Dubbeldam y MickyT. Reemplazado {}con tpara guardar otro byte.

PHP, 18 bytes

while(!readline())

AWK , 8 11 bytes

NF{exit}

Esperar entrada. Si el número de campos en la entrada es mayor que 0, salga.

EDITAR:

Me acabo de dar cuenta de que esto no funciona solo para la entrada que contiene caracteres de espacio en blanco. IFS debe establecerse en una cadena vacía usando-F "" opción de línea de comando. Por lo tanto +3 bytes.

Pruébalo en línea!

SpecBAS - 34 bytes

1 DO : INPUT a$: LOOP UNTIL a$<>""

Simplemente repite hasta que se ingrese una cadena no vacía.

Mathematica, 26 20 bytes

For[,Input[]==Null,]

Haskell, 19 17 bytes

f=do""<-getLine;f

Define una función f que si lee la línea vacía se llama a sí misma nuevamente. Al leer una línea no vacía, se genera una excepción y se detiene la recursividad.

Editar: @Laikoni reemplazó el parámetro con una coincidencia de patrón y guardó 2 bytes. ¡Gracias!

Aceto , 9 5 4 bytes

read un valor, lo niegan ( !; implícitamente se convierte en un booleano) y reflejan horizontalmente si el valor es verdadero ( |).

!
r|

Java, 66 64 60 bytes

int a(){return!System.console().readLine().isEmpty()?0:a();}

Mi primera respuesta de Java, me encantaría algunos consejos!

Braingolf , 8 bytes [no competidor]

1[{?:+|]

No compite porque { , que lee los comentarios de STDIN, se agregó a braingolf después de la fecha de publicación de este desafío.

Explicación:

1         Pushes 1 to the stack
 [        Begins while loop
  {       Reads from STDIN, returns -1 if no input given
   ?      Checks if last item in stack is > 0
    :     Else
     +    Adds the last 2 items together, however there is only 1 item, so add it to itself
      |   Endif
       ]  End While, decrement first item in stack, or exit if first item is 0

Carbón de leña , 4 bytes

Ｗ¬Ｓω

Explicación

Ｗ      While
  ¬Ｓ   Logical not of string input
     ω  Print ""

05AB1E , 5 bytes

[IõÊ#

Explicación:

[     Start infinite loop
 I    One line of input
   Ê  Not equal to
  õ   Empty string
    # Break if true

Pruébalo en línea!

PowerShell, 20 bytes

for(;!(read-host)){}

ejecuta un bucle for

read-host solicita entrada

si read-host no devuelve nada, se evalúa como falso, por lo que lo invertimos !(...)y lo usamos como la comprobación de finalización del bucle.

mucho más corto que cualquier do{$a=read-host}while($a-eq"")tipo de solución que involucra variables.

Rápido, 22 bytes

while readLine()==""{}

CJam , 5 bytes

{l!}g

Pruébalo en línea! (TIO realmente no muestra el comportamiento adecuado)

Explicación

{      e# Do:
 l     e#  Read next line of input
  !    e#  Boolean negate (empty strings are falsy)
   }g  e# Pop the top of stack, if truthy, repeat.