Zorluk basittir: Programınızın kaynak kodunun son, orta ve ilk karakterini bu sırada yazdırın.

Orta karakter, kaynak uzunluğu nkarakterleri ve 1 indeksleme varsayımıyla aşağıdaki gibi tanımlanır :

• Eğer nhatta olduğunu yazdırmak n/2oyunu bırakanların ve n/2 + 1-th karakter. ( abcdef == cd)
• Tek nise, (n-1)/2 + 1karakter basımı . ( abcde == c)

kurallar

• Giriş yapılmazsa, kaynak kodunuzdaki son, orta ve ilk karakteri formda yazdırın [last][middle][first]. Bu, 3-4 karakter uzunluğunda olacak.
• Çıktı izleyen bir boşluk içermemelidir. Bununla birlikte, boşluk ilk, orta veya son karakter ise, böyle yazdırılmalıdır.
• Kaynak kodu n >= 3karakter uzunluğunda olmalıdır .
• Kod >= 3benzersiz karakterlerden oluşmalıdır .
• Standart boşluklar yasaktır.
• Bu kod-golf , karakterlerin kazandığı en kısa çözüm .

Numuneler

# Form: [code] --> [output]
xyz --> zyx
abcd --> dbca
1 --> # not allowed: too short
abcde --> eca
aaabb --> # not allowed: not enough unique characters
System.out.print("S;pr"); --> ;prS
this is a test --> ts t
123[newline]45 --> 53[newline]1

Meydan Teklifi

JavaScript, 9 7 bayt

N=>a=-N

Çıktılar: NaN

Çevrimiçi deneyin!

Çim , 17 bayt

wWWwwwVVwWWwWWWww

Çevrimiçi deneyin!

Jimmy23013 sayesinde -2 bayt.

Çıkışlar www. Grass w, Wve dışındaki tüm karakterleri yok sayar v. İki Vs böylece göz ardı edilir; orta karakterin elde edilmesini sağlamak için oradalar a w- Nasıl çıkacağını vveya WÇimen'i nasıl yazacağımı bilmiyorum … Bunun yerine başka bir karakter kullanabilirdim Vama Vkodun estetiğini koruyor.

brainfuck , 17 bayt

U-[>+<-UU--]>...U

Çevrimiçi deneyin!

Yazdırılamayanlarla bu 7 bayta azaltılabilir: ␀..␀_.␀

Shakespeare Programlama Dili , 119 bayt

 ,.Ajax,.Page,.Act I:.Scene I:.[Enter Ajax and Page]
Ajax:  You big big big big big cat.Speak thy.Speak thy.Speak thy. 

Çevrimiçi deneyin!

Üç boşluk yazdırır. Baskı alanı olmadan:

Shakespeare Programlama Dili , 227 bayt

,.Ajax,.Page,.Act I:.Scene I:.[Enter Ajax and Page]Ajax:You is the sum of a big big big big big big cat a big pig.
You is the sum of you a large huge large big pig.
Speak thy.Speak thy.You is the sum of you a big pig.Speak thy.

Çevrimiçi deneyin!

Newline-free INTERCAL cevabım gibi, bu da programın son karakterini orta karakterle aynı kılmak (bu durumda da ilk olmasa da), kodun ikinci yarısını açmak için kullanana kadar eşleşme. (46'yı daha az baytta yapıp yapamayacağımı veya ilk yarının diğer kısımlarını daha fazla golf oynayabildiğimden emin değilim.)

Python 2 , 13 11 bayt

print' t' 

Beyaz alanı netleştirmek için:

$ xxd solution.py
0000000: 0a70 7269 6e74 2720 7427 20           .print' t'
$ python2 solution.py | xxd
0000000: 2074 0a                                t.

Çevrimiçi deneyin!

_{-2 bayt, israf sayesinde!}

RProgN 2,3 bayt

1
0

Çevrimiçi deneyin!

Bence bu geçerli mi?

05AB1E , 7 5 bayt

„ RR

Çıkışlar R \n.

@ Neil'in Batch cevabından ilham alarak -2 bayt , bu yüzden onu da güçlendirdiğinizden emin olun!

Çevrimiçi deneyin.

@Grimy tarafından 5 byte alternatif :

12,1

Çıkışlar 12\n.

Çevrimiçi deneyin.

İlk 7 baytlık cevap:

'?„«'«?

Çıkışlar ?«'.

Çevrimiçi deneyin.

Açıklama:

          # No-op newline
„ R       # Push 2-char string " R"
   R      # Reverse this string to "R "
          # (output the result implicitly with trailing newline)

          # No-op newline
12,       # Print 12 with trailing newline
   1      # Push a 1 (no implicit printing, since we already did an explicit print)

'?       '# Push 1-char string "?"
  „«'    '# Push 2-char string "«'"
     «    # Concatenate them both together
      ?   # Output without trailing newline

PHP , 9 bayt

<?=";;<";

Çevrimiçi deneyin!

Jöle , 5 bayt

001 0

Çevrimiçi deneyin!

Çıktının iki farklı karakteri vardır, ancak kodun üçüncüsü de vardır.

Önemsiz 4 bayt sürümü:

1231

Excel, 9 bayt

=("))=" )

Çok fazla parantez.

Not: Dönen orta karakter, kodun ortasından beri herhangi bir karakter olabilir.

Yakut , 6 bayt

p " "

Çevrimiçi deneyin!

Bu çıktılar " "ve yeni bir satır. Kod a ile bitiyor ", ortadaki iki karakter ve "ve yeni bir satırla başlar.

DOS / Windows Toplu Dil, 9 bayt

@echo @o@

Ruby , 11 9 bayt

print:ptp

Çevrimiçi deneyin!

Toplu, 9 karakter

@echo hh

Orta ve son karakter ikisidir hve sonra echobetiğin ilk karakteri olan varsayılan olarak yeni bir satır yazdırır.

PowerShell, 3 bayt

00000000: 0a0d 31                                  ..1

Yalnızca Microsoft Windows'ta çalışır.

Çıktı ne yazık ki UTF-16’da 8 bayttır. Ancak soru, karakterlerin çıktı olduğunu, baytların olmadığını söylüyor. Muhtemelen UTF-16, PowerShell'deki karakterleri temsil etmenin desteklenen yollarından sadece biridir. ASCII dosyalarından farklı şekilde yorumlanmazlar.

Bash ( 15 11 karakter)

echo -n e-e

hangi yazdırır

e-e

• Kullanmayarak -4 karakter |rev

ArnoldC , 61 bayt

IT'S SHOWTIME
TALK TO THE HAND "D I"
YOU HAVE BEEN TERMINATED

Çevrimiçi deneyin!

ArnoldC’daki önemsiz cevap. 31 bayt, tam anlamıyla dize hemen önce boşluktur.

Düşük yük , 9 bayt 7 bayt

Gelişmiş çözüm için Khuldraeseth na'Barya'ya teşekkürler !

W(SSW)S

Söyleyebileceğim gelince, bu şu anda çözülemez:

• İlk karakter no-op olmayan bir karakter olmalıdır, çünkü diğer her komut istif boş olduğundan dolayı bir hata oluşturur, bunun dışında bir açma braketidir. Bununla birlikte, bu, Underload'da kendi başına bir açılış braketi çıkarmanın bir yolu olmadığından olamaz.
• 3 çıkış karakterini yığına eklemek için en az 5 karakter kullanmanız gerekir.
• Çıktı almak için S kullanmanız gerekir.

Çevrimiçi deneyin!

Shakespeare Programlama Dili , 163 153 bayt

-Jo King sayesinde 10 bayt.

B,.Ajax,.Page,.Act I:.Scene I:.[Enter Ajax and Page]Ajax:You is
the sum ofa Big Big Big BIG BIG cat a
CAT.Speak thy.You is twice you.Speak thy!SPEAK THY!

Çevrimiçi deneyin!

İlk SPL cevabım! Çıkışlar !BB.

Orada başka İlgisiz Dize'de SPL cevap; Bu cevapta, yalnızca 119 baytlık boşluklar çıkarırlar veya 227 baytlık boşluk olmayan karakterler çıkarırlar. Bu, arasına girer ve ayrıca boşluk olmayan karakterler de çıkarır.

Burada iki püf noktası kullanılır:

1. !.!$2^5+1$.
2. Doubling 33 B, oyun başlığının kod Bnoktasını 66 verir ve SPL'nin büyük / küçük harfe duyarsız olduğu için işe yarayan ikinci "büyük" olan "Büyük" olmak zorundayım.

BSonunda o başkente ve ünlem işaretine ihtiyacım olduğu için, Ajax'ın sahnenin içinden daha yüksek sesle ve daha yüksek sesle bağırmasına karar verdim.

CJam , 7 bayt

'@'' _@

Çevrimiçi deneyin!

Befunge-93 , 7 bayt

.",  @0

Çevrimiçi deneyin!

açıklama

Çıktı 0 .

.       pop value (0) from stack, output as number with a trailing space
 "      toggle string mode, wraps around and pushes every char to the stack
  ,     pop value (".") from stack, output as character 
        spaces are no-ops
     @  end the program
      0 trailing 0 to match the output

APL (Dyalog Unicode) , 5 4 bayt

Tam programlar.

J. Sallé'den sıkıcı çözüm:

1231

Bu numarayı yazdırır. Çok daha ilginç bir çözüm:

010E1

Çevrimiçi deneyin!

APL baştaki sıfırları yok sayar, bu nedenle bu, 10 × 10¹ = 100 için ölçeklendirilmiş formattır.

Aşçı , 447 bayt

Last Middle First Milkshake.

This recipe prints its last, middle and first character.
You could also use it to make a milkshake. 

Ingredients.
76 ml milk
32 ml chocolate syrup
46 teaspoons vanilla ice cream

Method.
Liquefy vanilla ice cream.
Put the milk into 1st mixing bowl.
Put the chocolate syrup into 1st mixing bowl.
Put the vanilla ice cream into 1st mixing bowl.
Pour contents of the 1st mixing bowl into the 1st baking dish.

Serves 1.

Çevrimiçi deneyin!

Ciddi bir başvuru, 196 177 bayt

A__ sayesinde

R.

Ingredients.
82 l a
103 l b
46 l c

Method.
Put a into mixing bowl.
Put b into mixing bowl.
Put c into mixing bowl.
Pour contents of mixing bowl into baking dish.

Serves 1.

Çevrimiçi deneyin!

Python 3, 19 bayt 13 bayt

print( ')(')

Yazdırma işlevi varsayılan olarak yeni bir satır ekler, böylece kod yeni bir satırla başlar. Kodun son karakteri "" "dir, bu yüzden ilk basılır. Karakter sayısının dengesiz olması için, yazdırma işlevinin argümanına eklenmiş bir boşluk bırakın. Lütfen kodun uygunsuzluğunu affedin.

Çıktılar: )(\n

Çevrimiçi deneyin.

Boşluk , 31 29 bayt

[S aS S T   S S S S S N
_Push_32][S N
S _Duplicate_32][S N
S _Duplicate_32][T  N
S S _Print_as_character][T  N
S S _Print_as_character][T  N
S S _Print_as_character]

@RobinRyder sayesinde -2 bayt .

Harfler S(boşluk), T(sekme) ve N(yeni satır) yalnızca vurgulama olarak eklenmiştir.
[..._some_action]sadece açıklama olarak eklendi.

Çevrimiçi deneyin (yalnızca ham alanlar, sekmeler ve yeni satırlarla).

aUzunluğu tek yapmak için no-op (herhangi bir boşluk olmayan karakter olabilir) içerir. Programın ilk yarısından önce eklenir, böylece orta karakter de bir boşluk olur çünkü orta karakter programın ikinci yarısında olsaydı yeni bir satır haline gelirdi. Boşluk olmayan tüm karakterler Boşluk programlarında yoksayılır.

Haskell , 17 bayt

main=putStr"\"Sm"

Çevrimiçi deneyin!

MathGolf , 5 4 bayt

1231

Tarafından sunulan önemsiz bir çözüm kullanarak -1 bayt @ErikTheOutgolfer onun jöle yanıtında yeni satır sondaki olmadan örtülü çıkışı ile herhangi bir dil için çalışır.

Çevrimiçi deneyin.

Orijinal 5 baytlık cevap:

ùù xx

Çıkışlar x ù.

Çevrimiçi deneyin.

Açıklama:

ùù x   # Push 3-char string "ù x"
    x  # Reverse it to "x ù"
       # (output the entire string joined together implicitly without trailing newline)

Brain-Flak , 11 bayt

(((())))

Çevrimiçi deneyin!

açıklama

Yığına 3 şey koymamız gerek. Bunu yapmanın en hızlı yolu yığına 3 1 (veya sıfır) koymaktır. Şimdi (kod noktası 1) Brain-Flak'ta hiçbir şey yapmadığından, bunları ilk orta ve son yerlere programa ekleyebiliriz. Şimdi bu biraz aldatıcı hissediyor, bu yüzden burada bence daha az aldatıcı olan iki cevap daha var.

Parantez, 31 bayt yazdırır

( (((((()()()()()){}){}){}))())

Çevrimiçi deneyin!

Bu cevap ayraçları yazdırır, böylece yazdırılan karakterlerin kodla gerçekten ilgili olması gerekir, uzunluğu tek yapmak için bir dolgu karakteri vardır, bu nedenle yalnızca 1 orta karakter yazdırmamız gerekir.

Yalnızca parantez, 32 bayt içerir

(((()((((()(()()){}){}){}){}))))

Çevrimiçi deneyin!

Bu bir parantez sadece hem kaynağı hem de (sonuç olarak) çıktısını tamamen parantezlerden yapar (karakter Brain-Flak aslında umursar).

AsciiDots - 9 bayt

.---$'.$.

Çıktı: .$.

Kod a ile başlar, a .ile biter .ve orta karakter a $. Ortadaki tek alıntı, nokta baskı modunu doğrudan çıktı akışına karakterleri okuyacak şekilde ayarlar.

Bunun daha küçük hale getirilmesi mümkündür, ancak olabileceğinden şüphe duymaya başladım. Üç karakter yazdırmak için tekli alıntı kullanılmalıdır, çünkü çifte alıntı çıktı almak için dizeye bir son verilmesini gerektirir. Ancak, bu, tek bir teklifin a) 'nın üç karakterle takip edilmesi gerektiği ve b)' nin merkez karakter olamayacağı anlamına gelir. Bunu yedi bayta indirgemek için, noktanın başlangıcını basılan karakterlerden biri olarak tekrar kullanmayı deniyordum (AsciiDot'un quine programı gibi). Ancak, baskı için mümkün olan en kısa dizinin($'üç alanda dört karakter veya dört alanda üç karakter yazdırmak zorunda kalacaktı. Ayrıca, noktanın değerini (0 olan) karakterlerden biri olarak basmaya çalışmak gibi bazı zorlu alternatif yöntemleri de denedim. Çalışan bazı sistemler olsa da, bunları oldukça karmaşık ve büyük buldum. Dolayısıyla, yukarıdakilerin en küçük çözüm olduğunu düşünüyorum. (Daha küçük bir şey bulursam güncellerim)

MATLAB, 13 15 bayt

disp(  ') d')

çıktılar ) d

Önceki sürüm (15 bayt, daha az katı çıktı):

'''';1;''''''''

çıktılar '''