Herausforderung

Schreiben Sie eine Funktion, die einen Parameter akzeptiert: eine Ganzzahl t. Ihre Funktion muss Ihr Programm für tSekunden anhalten, bevor Sie fortfahren können, ähnlich wie time.sleep(t)in Python und WAIT tin BBC BASIC.

Sie dürfen nach einer bestimmten Zeit keine eingebauten Wartefunktionen oder eingebauten Funktionen zum Ausführen von Code verwenden, und Ihr Programm muss nach tSekunden fortgesetzt werden.

Zum Testen Ihrer Funktion gibt es eine Toleranz von 0,1 Sekunden mehr oder weniger als tauf Ihrem eigenen Computer angegeben: Abweichungen zwischen Computern sind in Ordnung.

Wenn Ihre Antwort von niemandem in Frage gestellt wird, müssen Sie einen Nachweis fotografischen (screenshotted) sehen vor , dass Ihre Funktion korrekt arbeitet t=1, t=5und t=25. Sie können auch die Details Ihres Computers angeben, damit die Benutzer versuchen können, sie auf ihrem eigenen Computer zu replizieren.

Ihr Programm sollte und wird auf einem Computer mit einer Taktrate von 1,6 GHz oder höher ausgeführt.

Gewinnen

Das kürzeste Programm gewinnt.

Kopfgeld

Eine Prämie geht an das kürzeste Programm, das das Programm stoppt, ohne eine Schleife zu verwenden, um zu prüfen, wie viel Zeit verstrichen ist. Wenn Sie sich für diese Prämie bewerben, fügen Sie eine Fußnote hinzu, die besagt, dass Ihre Antwort für die Prämie gilt.

Bestenliste

/* Configuration */

var QUESTION_ID = 55293; // Obtain this from the url
// It will be like http://XYZ.stackexchange.com/questions/QUESTION_ID/... on any question page
var ANSWER_FILTER = "!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe";
var COMMENT_FILTER = "!)Q2B_A2kjfAiU78X(md6BoYk";
var OVERRIDE_USER = 30525;

/* App */

var answers = [], answers_hash, answer_ids, answer_page = 1, more_answers = true, comment_page;

function answersUrl(index) {
  return "http://api.stackexchange.com/2.2/questions/" +  QUESTION_ID + "/answers?page=" + index + "&pagesize=100&order=desc&sort=creation&site=codegolf&filter=" + ANSWER_FILTER;
}

function commentUrl(index, answers) {
  return "http://api.stackexchange.com/2.2/answers/" + answers.join(';') + "/comments?page=" + index + "&pagesize=100&order=desc&sort=creation&site=codegolf&filter=" + COMMENT_FILTER;
}

function getAnswers() {
  jQuery.ajax({
    url: answersUrl(answer_page++),
    method: "get",
    dataType: "jsonp",
    crossDomain: true,
    success: function (data) {
      answers.push.apply(answers, data.items);
      answers_hash = [];
      answer_ids = [];
      data.items.forEach(function(a) {
        a.comments = [];
        var id = +a.share_link.match(/\d+/);
        answer_ids.push(id);
        answers_hash[id] = a;
      });
      if (!data.has_more) more_answers = false;
      comment_page = 1;
      getComments();
    }
  });
}

function getComments() {
  jQuery.ajax({
    url: commentUrl(comment_page++, answer_ids),
    method: "get",
    dataType: "jsonp",
    crossDomain: true,
    success: function (data) {
      data.items.forEach(function(c) {
        if (c.owner.user_id === OVERRIDE_USER)
          answers_hash[c.post_id].comments.push(c);
      });
      if (data.has_more) getComments();
      else if (more_answers) getAnswers();
      else process();
    }
  });  
}

getAnswers();

var SCORE_REG = /<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/;

var OVERRIDE_REG = /^Override\s*header:\s*/i;

function getAuthorName(a) {
  return a.owner.display_name;
}

function process() {
  var valid = [];
  
  answers.forEach(function(a) {
    var body = a.body;
    a.comments.forEach(function(c) {
      if(OVERRIDE_REG.test(c.body))
        body = '<h1>' + c.body.replace(OVERRIDE_REG, '') + '</h1>';
    });

    var patt = new RegExp(/[Bb]ounty/);
    var res = patt.test(body);
    var bountyyn = "no";

    if (res) {
      bountyyn = "yes";
    }
    
    var match = body.match(SCORE_REG);
    if (match)
      valid.push({
        user: getAuthorName(a),
        size: +match[2],
        language: match[1],
        link: a.share_link,
        bounty: bountyyn
      });
    
  });
  
  valid.sort(function (a, b) {
    var aB = a.size,
        bB = b.size;
    return aB - bB
  });

  var languages = {};
  var place = 1;
  var lastSize = null;
  var lastPlace = 1;
  valid.forEach(function (a) {
    if (a.size != lastSize)
      lastPlace = place;
    lastSize = a.size;
    ++place;
    
    var answer = jQuery("#answer-template").html();
    answer = answer.replace("{{PLACE}}", lastPlace + ".")
                   .replace("{{NAME}}", a.user)
                   .replace("{{LANGUAGE}}", a.language)
                   .replace("{{SIZE}}", a.size)
                   .replace("{{LINK}}", a.link)
                   .replace("{{BOUNTY}}", a.bounty);
    answer = jQuery(answer);
    jQuery("#answers").append(answer);

    var lang = a.language;
    if (/<a/.test(lang)) lang = jQuery(lang).text();
    
    languages[lang] = languages[lang] || {lang: a.language, user: a.user, size: a.size, link: a.link};
  });

  var langs = [];
  for (var lang in languages)
    if (languages.hasOwnProperty(lang))
      langs.push(languages[lang]);

  langs.sort(function (a, b) {
    if (a.lang > b.lang) return 1;
    if (a.lang < b.lang) return -1;
    return 0;
  });

  for (var i = 0; i < langs.length; ++i)
  {
    var language = jQuery("#language-template").html();
    var lang = langs[i];
    language = language.replace("{{LANGUAGE}}", lang.lang)
                       .replace("{{NAME}}", lang.user)
                       .replace("{{SIZE}}", lang.size)
                       .replace("{{LINK}}", lang.link);
    language = jQuery(language);
    jQuery("#languages").append(language);
  }

}

body { text-align: left !important}

#answer-list {
  padding: 10px;
  width: 400px;
  float: left;
}

#language-list {
  padding: 10px;
  width: 290px;
  float: left;
}

table thead {
  font-weight: bold;
}

table td {
  padding: 5px;
}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script>
<link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b">
<div id="answer-list">
  <h2>Leaderboard</h2>
  <table class="answer-list">
    <thead>
      <tr><td></td><td>Author</td><td>Language</td><td>Size</td><td>Bounty?</td></tr>
    </thead>
    <tbody id="answers">

    </tbody>
  </table>
</div>
<div id="language-list">
  <h2>Winners by Language</h2>
  <table class="language-list">
    <thead>
      <tr><td>Language</td><td>User</td><td>Score</td></tr>
    </thead>
    <tbody id="languages">

    </tbody>
  </table>
</div>
<table style="display: none">
  <tbody id="answer-template">
    <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td>{{BOUNTY}}</td><td><a href="{{LINK}}">Link</a></td></tr>
  </tbody>
</table>
<table style="display: none">
  <tbody id="language-template">
    <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr>
  </tbody>
</table>

x86_64-Maschinencode, 10 Byte

Hexdump des Codes:

48 69 c9 ca fc 59 38 e2 fe c3

Quellcode (kann ml64von Visual Studio zusammengestellt werden):

    TITLE   heh

PUBLIC  mywait
_TEXT   SEGMENT
mywait  PROC
    imul rcx, 945421514
myloop:
    loop myloop
    ret
mywait  ENDP
_TEXT   ENDS
END

Führt eine leere Schleife aus, beginnend mit dem angegebenen Wert bis 0. Ich habe den Multiplikator 945421514 empirisch durch Ausprobieren ausgewählt, bis mein Testprogramm zufriedenstellende Ergebnisse lieferte.

Testprogramm (wartet 10 Mal für jede Dauer von 1, 5 und 25 Sekunden):

#include <stdio.h>
#include <time.h>

extern "C" void mywait(int);

int main()
{
    int durations[] = {1, 5, 25};
    for (int duration: durations)
    {
        for (int i = 0; i < 10; ++i)
        {
            clock_t before = clock();
            mywait(duration);
            clock_t after = clock();
            printf("%f\n", (after - before) / (double)CLOCKS_PER_SEC);
        }
    }
    getchar(); // now take a screenshot
}

Das Ergebnis:

1.003000
1.000000
1.004000
1.006000
1.005000
0.998000
0.995000
1.000000
1.005000
1.004000
4.999000
5.003000
5.035000
5.010000
4.992000
5.003000
5.003000
5.019000
5.026000
4.989000
25.041000
24.993000
25.049000
24.988000
25.038000
24.948000
25.007000
25.014000
25.053000
25.021000

Ich habe dieses Programm auf einem Windows-Computer ausgeführt, der sonst nichts zu tun hat. Wenn einige Anwendungen ausgeführt werden, sind die Wartezeiten unregelmäßiger.

Die CPU-Geschwindigkeit beträgt 3,9 GHz. Es scheint, dass dieser Code für die aktuelle PC-Technologie kaum gut genug ist - wenn die Taktfrequenz etwa 8,8 GHz beträgt, passt der Multiplikator nicht in ein vorzeichenbehaftetes 32-Bit-Int.

PS Da diese Antwort nicht prüft, wie viel Zeit vergangen ist, ist sie ein Kandidat für das Kopfgeld.

Bash, 29 25 24 23 19 Bytes

w()(ping -t$1 1.2)

Genauigkeitstest ( time) mit $1= 1 Sekunde:

real    0m1.012s
user    0m0.001s
sys     0m0.002s

Vielen Dank, Dennis, dass du die Anzahl der Bytes von 23 auf 19 gesenkt hast!

BEARBEITEN : Ich habe die IP geändert, um pingunter Linux Ping 0.0.0.0 zu vermeiden , das das Loopback-Gerät ist.

Wie das geht

ping Das Standard-Timeout beträgt 1 Sekunde. Wenn Sie also eine nicht vorhandene IP-Adresse kontaktieren, kann der Ping-Vorgang erst fortgesetzt werden, wenn das Timeout abgelaufen ist oder eine Antwort von der IP-Adresse eingegangen ist.

-tGibt pingan, $1wie oft versucht werden soll, diese gefälschte IP-Adresse pingzu verwenden, wobei $1Sekunden erforderlich sind , um den Ping-Vorgang abzuschließen.

Matlab, 33 Bytes

function f(t)
tic;while toc<t,end

Oder Sie können dies auch in Octave verwenden: Probieren Sie es online aus

Matlab, 31 Bytes

Wie von @flawr vorgeschlagen , kann es mit einer anonymen Funktion durchgeführt werden (es sollte ein Name vergeben werden, um es zu verwenden):

@(t)eval('tic;while toc<t,end')

Beispiel:

>> f=@(t)eval('tic;while toc<t,end');
>> tic, f(2), toc
Elapsed time is 2.000323 seconds.

Java, 63 62 Bytes

t->{for(long a=System.nanoTime();System.nanoTime()-a<t*1E9;);}

Kein Wunder - einfach die Anzahl der Nanosekunden seit dem 1.1.1970 mehrmals erfassen und prüfen, ob eine Sekunde verstrichen ist.

Dank Ypnypn und aditsu 1 Byte gespeichert.

Batch, 27 Bytes

set /a c=%1+1
ping -n %c% 0

Ein beliebter Batch-Trick, da Batch keine Sleep-Funktion hatte.

Keine Schlaufe, also prämienberechtigt

Commodore 64 BASIC, 19 16 Bytes

1000 FORI=1TO930*N:NEXT:RETURN

Mit einem Anruf N=<number-of-secods>:GOSUB1000.

Ich kann jedoch keine ausreichende Genauigkeit liefern. Da C64 etwa 1 MHz CPU - Geschwindigkeit hatte, ich erinnere mich gut genug war , eine leere zu machen FOR- NEXTSchleife 1000 mal so , dass es etwa 1 Sekunde.

Tatsächlich gab es zwei Hauptversionen der Maschine: PAL 0.985 MHz und NTSC 1.023 MHz (alle Daten von C64 Wikipedia Page ). Da ich die NTSC-Version hatte, musste die Schleife ungefähr 930 Mal ausgeführt werden.

Tests mit folgendem Programm ( NSekunden, vom Benutzer eingegeben INPUT):

10 INPUT N
20 PRINT TI$
30 GOSUB 1000
40 PRINT TI$
50 END
1000 FOR I=1 TO 930*N:NEXT I:RETURN

Dabei TI$handelt es sich um eine Systemvariable, die einen String ( hhmmssFormat) mit der Zeit enthält, die seit dem letzten Zurücksetzen verstrichen ist (1 Sekunde Genauigkeit, jedoch auch abhängig von der CPU-Geschwindigkeit, dies ist also nicht ganz relevant, da es sich um dieselbe Uhr handelt).

Screenshot erstellt mit dem Online-C64-Emulator http://codeazur.com.br/stuff/fc64_final/ .

Dieses Programm ( 1000nur Zeile ) belegt 16 bis 19 Bytes im Speicher. Dies wurde PRINT FRE(0)+65535sowohl vor dem Eingeben des Codes (38908 Bytes) als auch nach dem Eingeben ( 38893 bis 38889 Bytes) getestet. PRINT FRE(0)Gibt den freien Speicher für das BASIC-Programm zurück (es ist ein negativer Wert, und es 65535sollte eine Konstante hinzugefügt werden, aber das spielt keine Rolle).

Da dieses Programm die in einer Schleife verstrichene Zeit nicht testet, ist es für eine Prämie qualifiziert.

JavaScript ES6, 50 45 40 Bytes

n=>{for(g=Date.now,z=g();z+n*1e3>g(););}

Dies verwendet selbstausführende Funktionen, nicht sicher, warum +new Datenicht funktioniert.

Verwendung

Ich habe dies mit Safari Nightly getestet, aber es wird auch mit Firefox funktionieren. Getestet mit:

(
  n=>{for(g=Date.now,z=g();z+n*1e3>g(););}
)(1); // 1 is the delay is seconds
console.log( 'foo' );

Sie können es ausführen, indem Sie es in Klammern setzen:

( n=>{for(g=Date.now,z=g();z+n*1e3>g(););} )(5)

Oder indem Sie es benennen:

const wait=n=>{for(g=Date.now,z=g();z+n*1e3>g(););}
wait(5)

Erläuterung

Hier ist die Hauptlogik hinter dem Programm:

function (n) {
    var start = Date.now();   // Save start time (ms)
    while (                   // while is synchronous, it'll block the code execution until it has finished
           start + (n * 1000) // This is the end time (start + delay)
            > Date.now()      // When the current time is 1 ms past the target end time, stop. resuming the code execution
          );
}

Die von mir verwendete Version verwendet dieselbe Logik:

n=>{ // Function with argument n, { is required if the functions is not just an expression
   for(           // For will also block code execution
                  // This first part is used to define variables
      g=Date.now, // Add an alias for Date.now as "g"
      z=g()       // get current time and store in z
      ;           // Next part, condition
      z + n*1e3   // Target end time, ( start + delay (converted to seconds) ) 1e3 is 1000 but in big e notation
      ;           // Is required for a valid for loop
   );
}

CJam, 15

{e3es+{_es>}g;}

Dies ist ein Block, der ausgeführt oder in einer Variablen gespeichert werden kann (wodurch eine benannte Funktion entsteht). Dennis und Mr Consensus sind sich einig, dass es akzeptabel ist, nur den Block zu zählen :)

Erläuterung:

e3       multiply the argument by 1000 (to get milliseconds)
es       get the current timestamp in milliseconds
+        add the values, obtaining the stopping time
{…}g     do…while
  _      duplicate the stopping time
  es>    check if we reached that time yet (loop condition)
;        discard the stopping time

Probieren Sie es online aus

JavaScript, 68 54 51 42

Ich denke, es wird kein Screenshot benötigt. Aber ich vermute, Sie könnten noch mehr Golf spielen ...

Neue Version: Ich habe es jetzt endlich geschafft, zweimal zu vermeiden newund zu verwenden Date:

f=t=>{for(x=(d=Date.now)();d()<x+t*1e3;);}

Ältere Versionen:

f=t=>{for(x=new Date();(new Date()|0)<x|0+t*1e3;);}

f=t=>{x=(new Date())|0;while((new Date()|0)<x+t*1e3);}

f=t=>{x=new Date().getSeconds();while(new Date().getSeconds()<x+t);}

PHP, 171 177 84 79 65 64 62 Bytes

<?php function a($i){for($f=microtime,$e=$f(1)+$i;$f(1)<$e;);}

Verwendung:
Rufen Sie die Funktion folgendermaßen auf:
php -d error_reporting=0 -r "require 'script.php'; a(5);echo 'Hello, World!';"
Wobei 5 die Zeit in Sekunden ist, die das Programm warten soll, bis es "Hello, World!"

Erläuterung:
Die Funktion ermittelt zunächst die aktuelle Zeit in Millisekunden. Dann führt die Funktion eine Schleife durch, bis die aktuelle Zeit kleiner als das erste Mal + die Eingabe ist. Danach "Hallo Welt!" wird wiedergegeben.

Log:
113 Bytes dank Voitcus
gespeichert 2 Bytes dank Axiac gespeichert

Julia, 33 20 Bytes

t->watch_file(".",t)

Funktioniert nur in Julia v0.4 aufgrund von Änderungen in der Funktionssignatur von watch_file. Definiert eine anonyme Funktion mit einem einzelnen Parameter t, der (ab) den Timeout-Parameter in der watch_fileFunktion verwendet.

Dies ist ein Kandidat für das Kopfgeld!

Demonstration mit der Julia REPL:

julia> f=t->watch_file(".",t)
(anonymous function)

julia> @elapsed f(1)
1.002134983

julia> @elapsed f(5)
5.006161965

julia> @elapsed f(25)
25.026096192

Vorherige Antwort (33 Bytes), funktioniert auch in Julia Stall

t->(b=time();while b+t>time()end)

R, 48 Bytes

f=function(t){a={g=Sys.time}();while(g()<a+t){}}

Demonstration:

t0 <- Sys.time();f(1); Sys.time() - t0 
## Time difference of 1.000272 secs

t0 <- Sys.time();f(5); Sys.time() - t0 
## Time difference of 5.011189 secs

t0 <- Sys.time();f(25); Sys.time() - t0 
## Time difference of 25.00848 secs

PHP, 39 Bytes

function a($a){while($i++<.4583e8*$a);}

(Beachten Sie, dass ich dies tatsächlich verkürzen kann, wenn ein vollständiges Programm erforderlich ist, indem ich die in der Befehlszeile übergebenen Argumente ausnütze. Bis zu 35 )

<?php while($i++<.4583e8*$argv[1]);

Programm zum Testen:

<?php function a($a){while($i++<.4583e8*$a);}

record(1);
record(5);
record(25);

function record($t)
{
    $time = microtime_float();
    a($t);
    echo microtime_float() - $time."\n";
}

function microtime_float()
{
    list($usec, $sec) = explode(" ", microtime());
    return ((float)$usec + (float)$sec);
}

Ergebnisse:

JamesWebster:Documents jameswebster$ php A.php
1.0093479156494
4.9945771694183
24.971961975098

Obwohl ich mich für das Kopfgeld qualifiziere, bin ich mit einigen anderen Einsendungen kaum im Rennen!

Windows CMD, 22 Byte

ping -w 1000 -n %1 1.1

Dies verwendet keine Schleife (label und goto), so dass dies für die Prämie qualifiziert ist

Es sendet tPings an 1.0.0.1 (ungültig) und wartet 1000 ms auf eine Antwort

JavaScript ES6, 40 Byte

t=>{for(t=(d=Date.now)()+t*1e3;d()<t;);}

Getestet mit:

elapsed=(f,t,b=(d=Date.now)())=>(f(t),console.log(d()-b+"ms elapsed")) // accepts func, delay
STOP=t=>{for(t=(d=Date.now)()+t*1e3;d()<t;);}
elapsed(STOP,1)  // prints 1000ms elapsed
elapsed(STOP,5)  // prints 5000ms elapsed
elapsed(STOP,25) // prints 25000ms elapsed

TI-BASIC (84 + SE), 21 Bytes

Eingabemethode: T:prgmT. Dies ist das nächste Äquivalent einer Funktion in TI-BASIC. Programm:

For(A,1,841Ans
End

Alle Genauigkeit wird durch Ausprobieren erreicht. Das Timing mit einer Stoppuhr funktioniert für alle gegebenen Testfälle innerhalb einer Zwanzigstelsekunde.

Geräteinformation:

RAM FREE   23312
ARC FREE  889802


 TI-84 Plus Silver Edition
          2.55MP
PROD #: 0A-3-02-37
ID: 0A3DC-C3469-FFE8

W00T berechtigt zu einer Prämie!

Python, 57 Bytes

import time
b=time.time
def y(i):
 x=b()
 while x+i>b():x

Funktion aufrufen y()

PureBasic, 92 Bytes

Procedure z(t)
t=t*1e3+ElapsedMilliseconds()
While t>ElapsedMilliseconds():Wend
EndProcedure

Es ist das kürzeste, an das ich denken kann. Ich vermute, dass dies auch hier die längste sein wird ...

Zu testen:

OpenConsole()
i=Val(Input())
s=ElapsedMilliseconds()
z(i)
PrintN(Str(ElapsedMilliseconds()-s))
Input()

PowerShell, 75 Byte

Lange, beschreibende Prozeduraufrufe. Yay für Klarheit in einer Sprache. :)

function w{param($i);$n=(Get-Date).AddSeconds($i);while($n-gt(Get-Date)){}}

Wird in einem Programm mit so etwas wie aufgerufen

Get-Date
w(15)
Get-Date

Wenn wir stattdessen externe Programme aufrufen dürfen, können wir alternativ mit den folgenden Schritten auf 59 Bytes reduzieren :

$n=(Get-Date).AddSeconds($args[0]);while($n-lt(Get-Date)){}

Dies würde in einem Programm wie folgt aufgerufen (vorausgesetzt, das oben Gesagte wird als "wait-function.ps1" gespeichert und im selben Ordner gespeichert):

Get-Date
& ((Split-Path $MyInvocation.InvocationName) + "\wait-function.ps1 15")
Get-Date

Was wir beim Schreiben der Funktion / des Programms sparen, ist jedoch mehr als überfordert durch den Überschuss, der zur tatsächlichen Ausführung erforderlich ist. Le seufzt.

Python, 66 Bytes

Beachten Sie, dass meine Implementierung weder eine eingebaute Zeitfunktion aufruft noch die Planungsfunktion verwendet.

def S(t):
 try:__import__("Queue").Queue().get(1,t)
 except:pass

Und ja, es kann Kopfgeld gezahlt werden.

Hassium , 55 Bytes

func w(t){p=time().second;while((p+t)>time().second)0;}

Führen Sie den folgenden Befehl aus und lesen Sie den erweiterten Code : http://HassiumLang.com/Hassium/index.php?code=9f4e2bdb292b14b150fba63677a11a79

Pyth, 19 Bytes

Verspätete Einreise, aber nachdem ich .d0gestern Abend in den Dokumenten nachgesehen hatte, entschloss ich mich, es zu versuchen.

DCNK.d0W<-.d0KNJ1))

Definiert eine Funktion, die eine Schleife durchläuft, bis die Zeit abgelaufen ist N Sekunden .

Probieren Sie es hier aus .

RProgN 2 , 13 Bytes

°°°)*™+]³]™>:

Erklärt

°°°)*™+]³]™>:
°°°             # Push 3 tens to the stack.
   )*           # Get the product of the entire stack, including the implicit input. This is the shortest way to multiply the input by 1000.
     ™+         # Add it to the current time in miliseconds.
       ]        # Duplicate it to use as a (throwaway) conditional.
        ³   :   # Create a function using the next 3 concepts, and while the top of the stack is truthy, execute it.
         ]      # Duplicate the target time
          ™>    # Is it larger than the current time?

Das Kopfgeld sagt ausdrücklich "ohne eine Schleife zu benutzen, die prüft, wie viel Zeit vergangen ist ", was dies nicht tut. Dadurch wird eine Zielzeit festgelegt, und es wird weiterhin überprüft, ob diese Zielzeit überschritten wurde, sodass die Prämie gewährt werden kann.

Probieren Sie es online!

Tcl , 53 Bytes

proc W t {while "\[clock mil]-[clock mil]<$t*1e3" {}}

Probieren Sie es online!

Erklärt

Der Befehl clock millisecondskann auf clock mildie erste geschützte Klammer reduziert werden. Er wird bei jeder Schleife interpretiert und nur einmal ausgeführt. Da es Millisekunden misst, müssen wir mit 1000 oder 1e3 multiplizieren, was 1 Byte spart.

C # (Visual C # Interactive Compiler) + /u:System.Threading, 36 Byte

x=>new SemaphoreSlim(0).Wait(x*1000)

Probieren Sie es online!

Erstellt ein Semaphor ohne Kapazität und versucht, es für die angegebene Anzahl von Sekunden abzurufen.

Mir ist klar, dass ich hier auf etwas "warte". Dies scheint mir eher die Lösung für Ping / Timeout zu sein alsThread.Sleep . Der Code versucht, eine Ressource abzurufen, die er nicht abrufen kann, und beendet den Versuch nach einem Limit.

===

Unten sehen Sie eine Variante, die eine TaskEndlosschleife startet und darauf wartet, dass sie mit einer Zeitüberschreitung abgeschlossen wird. Alle erforderlichen Namespaces sind standardmäßig enthalten, die Lösung ist jedoch einige Bytes länger als die oben angegebene.

C # (Visual C # Interactive Compiler) , 40 Byte

x=>Task.Run(()=>{for(;;);}).Wait(x*1000)

Probieren Sie es online!

05AB1E , 22 Bytes

žcžb60*+[Džcžb60*+αIQ#

Probieren Sie es online aus.

HINWEIS: Je nachdem, wie viele Mikrosekunden in der aktuellen Sekunde bereits vergangen sind, kann die Toleranz etwas größer als 0,1 Sekunden sein. Aber da fast die Hälfte der Antworten ähnliche Probleme hat, dachte ich, dass es erlaubt ist.

Erläuterung:

05AB1E hat zur Zeit keine eingebauten. Es verfügt jedoch über eine integrierte Funktion für das aktuelle Jahr / Monat / Tag / Stunden / Minuten / Sekunden / Mikrosekunden als separate integrierte Funktion. Da nur die Verwendung von Sekunden möglicherweise Probleme mit dem Umlauf von 59 auf 0 verursachen kann, benötige ich sowohl die Minuten als auch die Sekunden, wodurch der Code leider noch länger ist als die meisten Antworten in Nicht-Codegolf-Sprachen.

žc                # Push the current seconds
  žb              # Push the current minutes
    60*           # Multiply it by 60
       +          # Add them together
[                 # Start an infinite loop:
 D                #  Duplicate the initial (minutes*60 + seconds) from before the loop
  žcžb60*+        #  Push the current (minutes*60 + seconds) again
          α       #  And take the absolute difference between the two
           IQ     #  And if this is equal to the input:
             #    #   Stop the infinite loop

SmileBASIC, 20 Bytes

INPUT T
DIALOG"",,,T

Öffnet ein Dialogfeld, das nach TSekunden automatisch geschlossen wird . Ich bin mir nicht sicher, ob dies als "eingebaute Wartefunktion" gilt, aber ich denke, dies ist genauso gültig wie die Verwendung von ping.

Ein alternatives 37-Byte-Programm, das definitiv nicht schummelt:

INPUT T
FADE.,T*60WHILE FADECHK()WEND

Bewirkt, dass sich die Farbe der Bildschirmüberblendung über TSekunden allmählich auf 0 ändert (Alpha = 0, Rot = 0, Grün = 0, Blau = 0) (kein Effekt) und wartet, bis diese Animation beendet ist.