Aşağıdaki özelliklere sahip bir program yazın:

• Olduğu gibi çalıştığında, program çıktı üretmez (yani, çıktı 0 byte).

• Programın içinde (istediğiniz bir seçim: başlangıçta, sonunda veya ortada bir yerde olabilir) aşağıdaki özelliklere sahip bir konum vardır: herhangi bir dize yerleştirerek programı değiştirmek , ortaya çıkan programın o dizeyi yazdırmasına neden olur. idam.

  Bu, dizenin tırnak işaretleri, ters eğik çizgiler, yorum işaretleri, sınırlayıcılar, NUL baytlar vb. İçerip içermediğinden bağımsız olarak çalışmalıdır; Ne koyduğunuza bakılmaksızın, dize hala bir dize olarak yorumlanır ve tamamen sözlü olarak basılır. Bununla birlikte, derleyicinin hafızasının tükenmesine ya da benzerinin bitmesine neden olacaksa çok kesin dizeleri işleyemezsiniz (kesin olarak, en az 1000 bayt uzunluğunda ya da üç kez dizeleri kullanabilmelisiniz). programınızın uzunluğu, hangisi daha uzunsa).

Geçersiz bir çözüm örneği şöyle olabilir:

print("");
#      ^ text goes here

Python, Perl, Ruby, vb .; birçok dize için çalışsa da, çift tırnak içeren bir dize veya alt dizeyi içeren bir dize \n(yeni satır olarak yorumlanacaktır) için çalışmaz .

Bu sorunun çoğu dilde muhtemelen mümkün olmadığını unutmayın; Mesele en azından kısmen çalıştığı dili bulmaktır. Seçtiğiniz dil, bu sitenin tanımı altında bir programlama dili olmalıdır , örneğin Metin içinde bir çözüm sunmaz .

Bu bir kod golf olduğu için en kısa program şablonu kazanır. Ancak, mevcut kazananı geçemeseler bile çözüm sunmalarından vazgeçmeyin! Hala ikinci, üçüncü, vb. Yer için yarışabilirsiniz ya da mümkün olduğu kadar çok cevap bulabilmek için. Ancak, göndermeden önce programınızın tüm spesifikasyonları karşıladığından emin olmalısınız; yaklaşık çözümler problemin noktasını kaçıracaktır.

Excel, 1 bayt

'

Ungolfed versiyonu

'        <-- print the following text,
             and exit the current formula

Jolf, 6 bayt

a Lq6(

açıklama

a Lq6(
a       print
  L 6   all but the first 6 characters of
   q    the source code
     (  and exit

Perl 5 , 30 21 19 bayt

<VERİ> __ END__ yazdırmak

Çevrimiçi deneyin!

Sondaki yeni hat. Bu markaları keyfi veriler daha sonra üzerinden okunabilir kaynak dosyası, eklenecek sağlayan bir Perl özelliğini kullanmak DATAdosya tanıtıcısına. Argüman olarak bir dosya askısı verdiğimizde, dosya askısının printdosyadaki tüm satırların listesini döndürmesine neden olan bir liste bağlamı verilir. Daha sonra printörtük olarak hepsini birleştirir, satırları bölmeyi geri alır ve yeni satırların nerede olduğuna bakılmaksızın bize tam olarak orijinal dizgiyi verir.

Yeni hatları manuel olarak kullanmanın gerekmediğini fark eden @Dada ve her biri golf oynayabilecek bir karakter tespit eden @ ninjalj ve @b_jonas sayesinde.

Zsh, 6 bayt

<<'
'

Sonunda yeni bir satır var. Dize programın sonuna eklenir.

Bash, 20 17 bayt

3 byte'ı çıkardığı için Adam'a teşekkürler .

exec sed 1d "$0"

* nix kabuk betiği, 21 14 bayt

7 bayt'ı çıkardığı için Adam'a teşekkürler .

#!/bin/sed 1d

brainfuck ( Okunamayan Brainfuck ), 9 bayt

,+[-.,+]!

Girişi sonuna kadar ekleyin. Bu sefer sonunda yeni bir satır yok.

Programın sonuna eklenen girdileri kabul edecek dilleri ararken, beyin fırtınası farklı bir olasılık gibi görünüyordu; Esolangs dilinde yazılan birçok beyin fırtınası tercümanı hem programı hem de programın girişini standart girdiden alır ve bu nedenle aralarında anlatmak için bir yol gerekir. Bu durumda, bir !karakterin programla girdi arasında farklılaştığını gösteren bir kural var ,[.,]!Hello, world!; kısa beyin fırtınası programları yazmak için sıklıkla kullanılan bir numara ; Bu temelde !normalden farklı bir anlama sahip farklı bir beyin fırtınası lehçesi yaratır .

Teoride, bu nedenle, sadece bu tercümanlardan birini bulabiliriz catve şartnameyi yerine getirmek için bir program verebiliriz . Yine de büyük bir incelik var; brainfuck tipik olarak her hücre için 256 değer kullanır, 256 oktet vardır ve birinin EOF için kullanılması gerekir. Bu nedenle, tüm 256 okteti kelimenin tam anlamıyla yankılanmak istiyorsak, EOF'yi hiç tespit edemiyoruz ve programı başka bir şekilde sonlandırmamız gerekecek. Başka bir deyişle, 256 sekizlik ve EOF 257'ye farklı değerler veren veya EOF'de çöken bir uygulama bulmamız gerekiyor.

Okunamayan'ı girin . Okunamayan'da bu zorluğun önüne geçen ve bir girdiyi kabul eden bir beyin fırtınası tercümanı var !; Ek olarak, çoğu beyin sızıntısı yorumlayıcısının aksine, EOF için bignum hücreleri ve -1'i kullanır ve EOF'nin diğer 256 olası oktetten ayırt edilmesini sağlar. Bu nedenle, programın özel tercümanı olarak Okunamayan Brainfuck kullanımıyla cat, EOF = -1 üzerinde duran bir beyin fırtınası programı yazarak mücadeleyi sadece 9 byte çözebiliriz .

Daha iyisini yapmak mümkün mü? Eh, şu 7 baytlık programı deneyebilirsiniz hangi girişimleri çıktı o döngünün patlak önce dizenin sonunda EOF:

+[,.+]!

Bu programın davranışı, Okunamayan tercümanın hata koşullarındaki davranışına bağlıdır (bu nedenle, yalnızca beyin tıkanmasının uygulanmasına değil, beyin sızıntısının uygulanmasını çalıştırmak için kullanılan uygulamaya bağlıdır). Ne yazık ki, kullandığım Okunamayan tercüman standart çıktıdaki çıktıları veriyor , bu da tasarrufun işe yaramayacağı anlamına geliyor. EOF çıktısı girişiminde bulunan veya girişimi sessizce atlayan bir Okunamayan tercüman bilen varsa, bana bildirin; Bu orada yedi baytlık bir çözüm olurdu.

Dyalog APL , 11 bayt

Aşağıdaki, f fonksiyonunun gövdesidir :

2↓⎕CR'f'⋄→

Sonunda yeni bir satır var, bundan sonra her şey eklenebilir.

2↓ ilk iki satırı (başlık ve bu satır)

⎕CR'f'Cı haracter R, bir ePresentation f

⋄ sonra

→ bırakmak, vazgeçmek

Ruby, 20 bayt

print * DATA
__SON__

Giriş sonunda (izleyen satır sonundan sonra) gider. DATADeyim Ruby birçok biridir Perl çaldığı .

Eval.in'de deneyin: https://eval.in/684370

JavaScript + HTML5 DOM, 163 Bayt

<html><body><script>fetch(location).then((r)=>r.text().then((t)=>console.log(t.slice(145,t.lastIndexOf("</b")))));document.body.remove()</script></body></html>

Kapanış body etiketinden önce doğrudan istediğiniz herhangi bir şeyi ekleyebilirsiniz. Bu, sayfa kaynağını almak ve açılış kodunu ve kapanış etiketlerini çıkarmak suretiyle çalışır.

Gerçek öldürücü sonsuz bir döngüden nasıl kaçılacağını bulmaktı. while(true){}Sayfayı koymak , tüm geri aramaları sonsuza dek engeller, yürütmeyi dondurur ve JavaScript’in ana konuyu duraklatma yolu yoktur. Bununla birlikte, artık bulunmayan kod hiçbir zaman çalışmaz, bu nedenle belge gövdesi seppuku'yu en son komutta işleyerek klonunun yüklenmesini beklerken kendini siler.

Evet, uzun ve dolambaçlı, ancak JS'de mümkün olması gerçekten şaşırtıcı.

PHP, 46 bayt

(takip eden satır sonu dahil)

<?=join([""]+file(__FILE__));halt_compiler();
STRING HERE

Evet: filefonksiyon bile ikili güvenlidir.

[""]+ 0 dizini (dosyanın ilk satırı) boş bir dizeyle değiştirir

gs2 , 4 bayt

╥¶=☼

CP437 kodlamasını kullanır. Dize sonunda gider. ╥kaynak kodunu alır, ¶4 tuşuna basar, =önde gelen birçok karakteri bırakır ve ☼çıkar.

Çevrimiçi deneyin!

PHP 94 bayt

<?$f=fopen(__FILE__,'rb');fseek($f,93);while(false!==($c=fgetc($f)))echo$c;__halt_compiler();

Dizenizi son noktalı virgülün arkasına yerleştirin.

Gizli özellikleri için Yay sanırım? __halt_compiler (), tam olarak adından beklediğiniz şeyi yapar. Önceki kod sadece dosyayı açar ve bu son noktalı virgülten sonraki baytları stdout'a yazar. NUL, BEL vb. İyi çıkıyor. Unicode değişmezleri (♪) Windows'a batırıldı, ancak bunun yalnızca Windows cmd'nin unicode'da başarısız olduğunu düşünüyorum.

Perl 6 , 23 bayt

print $=finish
=finish

Dize sonra yeni satırda başlayarak yerleştirilir =finish.

PHP, 48 60 bayt

<?=substr(file_get_contents(__FILE__),60);__halt_compiler();STRING HERE

PHP'nin kapatılmasının dizenin içermesini engellemediğinin farkına vardım <?.

İkili Lambda Hesabı , 1 bayt

 [text goes here]

Bu, metinden önceki tek bir boşluk (0x20).

Çevrimiçi deneyin!

Nasıl çalışır

0x20 = 00100000 ₂ olarak ayrıştırıldı

00    λx.
01        x
0000  (ignored, can be anything)

(Aslında, karakterlerden herhangi biri !"#$%&\'()*+,-./eşit derecede iyi çalışacaktır.)

Bu tam bir ifade olduğu için, programın geri kalanı girdi verileri olarak ve ikili lambda matem I / O kuralları altında λ x özdeşliği altında yorumlanır . x , girişi doğrudan çıkışa kopyalar.

Bash, 17 bayt

tail -n+3 $0
exit
<string here>

Jimmy23013'ün cevabından bağımsız olarak geliştirildi .

RProgN , 19 Bayt

Q 19 Q L sub exit 

Sondaki boşluğa dikkat edin.

Bu öbekten sonra herhangi bir metni yerleştirin ve yazdırılacaktır.

Lynn'in gs2 cevabı dayanarak .

Çevrimiçi Deneyin!

Excel VBA, 6 Bayt

Bu daha çok, Adam'ın Cevabında VBA ortamındaki Orta Pencereye Yanıtında tutulan metnin nasıl basılacağı sorusuna cevap vermek içindir.

Temel kurulum:

Aktif sayfadaki A1 hücresinde , yazdırılacak dizgiyi tutmak için aşağıdaki formülü kullanın. Bayt sayımı uğruna, bu 1 Bayt ekleyecektir.

'[Your Text Here]

Örneğin:

'Hello 
World

Hemen Pencere İşlevi, 5 + 1 = 6 Bayt

?[A1]

'A1 hücresindeki +1 Bayt

Vim (eski modda), 28 bayt

#!/bin/ex -c ':1d' -c ':wq'
[string]

28 bayt son satırsonunu da içeriyor.

Vim, 738 bayt

:imap <esc> <c-v><esc>
:imap <c-a> <c-v><c-a>
:imap <c-b> <c-v><c-b>
:imap <c-c> <c-v><c-c>
:imap <c-d> <c-v><c-d>
:imap <c-e> <c-v><c-e>
:imap <c-f> <c-v><c-f>
:imap <c-g> <c-v><c-g>
:imap <c-h> <c-v><c-h>
:imap <c-i> <c-v><c-i>
:imap <c-j> <c-v><c-j>
:imap <c-k> <c-v><c-k>
:imap <c-l> <c-v><c-l>
:imap <c-m> <c-v><c-m>
:imap <c-n> <c-v><c-n>
:imap <c-o> <c-v><c-o>
:imap <c-p> <c-v><c-p>
:imap <c-q> <c-v><c-q>
:imap <c-r> <c-v><c-r>
:imap <c-s> <c-v><c-s>
:imap <c-t> <c-v><c-t>
:imap <c-u> <c-v><c-u>
:imap <c-v> <c-v><c-v>
:imap <c-w> <c-v><c-w>
:imap <c-x> <c-v><c-x>
:imap <c-y> <c-v><c-y>
:imap <c-z> <c-v><c-z>
:imap <c-@> <c-v><c-@>
:imap <c-\> <c-v><c-\>
:imap <c-]> <c-v><c-]>
:imap <c-^> <c-v><c-^>
:imap <c-?> <c-v><c-?>
i

Ekleme modundaki tüm kontrol karakterlerini <c-v>, ardından onları tam anlamıyla girecek olan kontrol karakterine yeniden bağlar . ^ _ (birim ayırıcı), varsayılan olarak tam anlamıyla çıktısı alındığından, yeniden bağlama işlemine ihtiyaç duymaz.

Değişken metin elbette sonunda gelir.