Во время выполнения продолжайте запрашивать строку ввода, пока пользователь не введет что-либо (кроме пустой новой строки), т.е. не будет просто нажимать Enterили OK. Вывод или результат не требуются и не запрещены.

Псевдокод 1

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

Псевдокод 2

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

Пример 1

Программа запускается и сразу же всплывает форма с одним текстовым полем и OKкнопкой.
Пользователь нажимает OKкнопку.
Ничего не произошло.
Пользователь вставляет «Hello World» в текстовое поле и нажимает OKкнопку.
Программа заканчивается.

Пример 2

Функция вызывается и сразу отображает пустую строку и мигающий курсор.
Пользователь нажимает Enter.
Курсор перемещается вниз на одну строку.
Пользователь нажимает Enter.
Курсор перемещается вниз на одну строку.
Пользователь нажимает PPCGEnter
Функция возвращается.

TI-BASIC, 2 байта

:Prompt X

TI-BASIC делает это автоматически. Как только ввод дан, он выйдет.

Вот GIF:

Посмотрите счет на enterключ в истории нажатия клавиш. Создано с помощью TI-SmartView CE и ezgif.com .

Python 3 , 18 байт

while''==input():0

Попробуйте онлайн!

Сед, 4

/./q

Ожидает строку ввода, содержащую 1 или более символов, затем завершается.

Попробуйте онлайн . Но лучше работает на живой оболочке:

sed '/./q'

JavaScript, 37 22 17 байт

while(!prompt());

while(!prompt());

объяснение

whileКлючевое слово начинает whileцикл. В состоянии цикла !prompt()запрашивает ввод и проверяет, задан он или нет. Если он не задан, выполняется тело цикла, которое в нашем случае пусто, тогда интерпретатор возвращается к состоянию цикла. Один и тот же процесс происходит снова и снова, пока пользователь не введет данные.

Java, 55 байт

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

Если я правильно помню (я давно работал с PPCG), моя программа может быть просто функцией.

Это зависит от системы; он работает только в системах, где символ конца строки представляет собой один символ новой строки. Если в конце-линии символ вместо возврата каретки, замените 10с 13. В Windows это не работает, как в конце строки в Windows \r\n.

Это использует тот факт, что я могу читать прямо с System.in.

HTML5, 33 22 байта

<form><input required>

<form><input required>

объяснение

requiredАтрибут на <input>заставляет браузер , чтобы сообщить пользователю «это поле требуется» -sort-оф-сообщений, если они не входят в стоимость. Однако, когда они вводят значение, оно отправляется на URL-адрес actionатрибута <form>(который в нашем случае является самим текущим файлом, поскольку мы не указали никакого значения явно).

Это было проверено на последней версии Google Chrome (версия 55.0). Может работать в других браузерах и версиях.

Желе , 3 байта

ɠṆ¿

Боюсь, на TIO особо не на что смотреть.

Попробуйте онлайн!

Как это работает

Это ниладная программа, то есть она не принимает входных аргументов. В этом случае неявный аргумент и возвращаемое значение равны 0 .

¿(while) - это быстрое, которое извлекает две ссылки из стека ссылок: условие ( Ṇ) и тело.

Ṇявляется монадическим атомом: плоское логическое НЕ. Если предыдущим возвращаемым значением является ложь (здесь 0 или пустая строка), возвращается 1 и вызывается тело.

ɠявляется ниладическим атомом; он читает необработанную строку из STDIN и возвращает результат.

Как только ɠчитает непустую строку, Ṇвозвращает 0 и мы вырываемся из цикла.

Pyth , 3 байта

W!w

Попробуйте онлайн!

Переведено на Python:

while Pnot(input()):
 pass

брейкфук , 26 байт

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

Попробуйте онлайн!

Perl 5, 8 + 1 (-p или -n flag) байт

/./&&die

Принимает ввод из stdin и умирает, как только регулярное выражение соответствует чему-либо, кроме новой строки.

C, 52 байта , 33 байта , 29 байтов

-19 байт благодаря Джастину

-4 байта благодаря Кристофу

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

10 равно '\ n' - если это не очевидно.

Bash, 51 байт (39 без "#! / Bin / bash")

Я впервые участвую в PPCG, так что не хамите; D

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

Java , 128 126 байт

2 байта благодаря Кевину Круйссену.

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

Попробуйте онлайн!

C # (.NET Core) , 66 байт

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

Попробуйте онлайн!

-6 байт благодаря разнагул.

QBasic 4.5, 15 байт

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

Запрашивает ввод, а затем проверяет, если таковые были даны. Если нет, RUNперезапускает программу.

Рубин, 13 байт

gets until/./

Я хотел getsбы принять аргумент Regexp.

R, 27 24 23 22 байта

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

Принимает ввод от stdin и повторяется до тех пор, пока ввод имеет длину 0. Отрежьте несколько байтов из-за Jarko Dubbeldam и MickyT. Заменено {}с , tчтобы сохранить другие байты.

PHP, 18 байт

while(!readline())

AWK , 8 11 байт

NF{exit}

Ждите ввода. Если количество полей на входе больше 0, выйдите.

РЕДАКТИРОВАТЬ:

Я только что понял, что это не работает для ввода, содержащего только пробельные символы. IFS должен быть установлен на пустую строку, используя параметр -F ""командной строки. Поэтому +3 байта.

Попробуйте онлайн!

SpecBAS - 34 байта

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

Просто циклы, пока не введена непустая строка.

Mathematica, 26 20 байтов

For[,Input[]==Null,]

Haskell, 19 17 байт

f=do""<-getLine;f

Определяет функцию, fкоторая, если она читает пустую строку, снова вызывает себя. При чтении непустой строки возникает исключение и рекурсия останавливается.

Редактировать: @Laikoni заменил параметр на соответствие шаблону и сохранил 2 байта. Благодарность!

Ацето , 9 5 4 байта

rпрочитайте значение, отмените его ( !; неявно приведите к логическому значению) и отразите по горизонтали, если значение - truey ( |).

!
r|

Java, 66 64 60 байт

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

Мой первый ответ на Java, хотелось бы несколько советов!

Braingolf , 8 байт [не конкурирует]

1[{?:+|]

Не конкурирующий, потому что {, который читает входные данные из STDIN, был добавлен в braingolf после даты публикации этого испытания.

Объяснение:

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

Древесный уголь , 4 байта

Ｗ¬Ｓω

объяснение

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

05AB1E , 5 байтов

[IõÊ#

Объяснение:

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

Попробуйте онлайн!

PowerShell, 20 байт

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

запускает цикл,

read-host запрашивает ввод

если read-host ничего не возвращает, он превращается в false, поэтому мы инвертируем это !(...)и используем в качестве проверки окончания цикла.

намного короче, чем любое do{$a=read-host}while($a-eq"")решение типа с участием переменных.

Swift, 22 байта

while readLine()==""{}

CJam , 5 байтов

{l!}g

Попробуйте онлайн! (TIO на самом деле не показывает правильное поведение)

объяснение

{      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.