Amacınız, herhangi bir girdi almayan ve aşağıdaki metni çıkaran bir program yazmaktır:
ca e na ŋa va o sa;
þa ša ra la ła.
ma a pa fa ga ta ča;
în ja i da ða.
ar ħo ên ôn ân uħo;
carþ taŋ neŋ es nem.
elo cenvos.
Ama bir yakalama var: L
kaynağınızdaki her harf (Unicode'daki genel kategorisi ile başlayan herhangi bir karakter ) için 20 karakter ceza alırsınız! (Referans olarak, yazdırılacak metinde 81 harf vardır.)
Aşağıdaki Perl 6 kodu 145 bayt ve 84 harfe sahiptir, bu nedenle 1.845 puanı alır:
say "ca e na ŋa va o sa;
þa ša ra la ła.
ma a pa fa ga ta ča;
în ja i da ða.
ar ħo ên ôn ân uħo;
carþ taŋ neŋ es nem.
elo cenvos."
Aşağıdaki kod 152 bayt ve 70 harfe sahiptir, bu nedenle 1.552 puanı alır:
$_="C e N ŋa V o S;
Þ Š R L Ł.
M a P F G T Č;
în J i D Ð.
ar ħo ên ôn ân uħo;
Crþ Tŋ neŋ es nem.
elo cenvos.";s:g/<:Lu>/{$/.lc~'a'}/;.say
Standart boşluklar yasaktır.
Başlangıçta, harfleri tamamen yasaklamayı düşündüm, ancak bunu mümkün kılan birçok dil olduğunu düşünmüyorum. Denemek için hoş geldiniz.
(ŋarâþ crîþ [ˈŋaɹa̰θ kɹḭθ] benim kavramlarımdan biri. Burada ismini büyük harfle yazmak istedim, ama burada çirkin büyük eng aldım. Oh, dil zaten romanizasyonunda büyük harf kullanmıyor.)
Düzenleme: Satırlardan birinin yanlış olduğunu fark ettim, ama zaten cevaplar olduğundan saklayacağım. Üçüncü satırın doğru sürümü ma a fa ga pa ta ča
; seçiminize göre, bunun yerine düzeltilmiş metni üretmeyi seçebilirsiniz.
a
s'yi kodlamak için bazı kısayollarla - ya da değil, Harfler, çünkü 20 karakter gerçekten büyük bir penaltıdır (her şey bayt tarafından puanlandığında, iyi tanımlanmamıştır ...)!