कई अलग-अलग वर्णों का उपयोग किए बिना स्वर निकालें


10

STDIN (हाँ, मुझे पता है, सरल) से स्ट्रिंग से स्वर (ए, ई, आई, ओ, यू) को हटाने की चुनौती है। आप उम्मीद कर सकते हैं कि आपके कार्यक्रम को किसी भी तर्क के साथ नहीं चलाया जाएगा argv

उदाहरण:

This program will remove VOWELS.
So we can now speak without them.

इसे बदल दिया गया है:

Ths prgrm wll rmv VWLS.
S w cn nw spk wtht thm.

कुछ पकड़ा गया है। विजेता प्रविष्टि को विभिन्न बाइट्स की संख्या के आधार पर तय किया जाता है। उदाहरण के लिए a abतीन अलग-अलग बाइट्स ( और a, bस्पेस) हैं। यदि दो या अधिक प्रविष्टियों में अलग-अलग बाइट्स की एक ही मात्रा होगी, तो उन प्रविष्टियों के लिए बाइट्स की संख्या पर फ़ॉलबैक किया जाता है।



इनपुट के बारे में क्या Renée’s naïveté? स्वरों की स्ट्रिप, निश्चित Rn’s nvtरूप से आउटपुट के रूप में होनी चाहिए । लगता है जैसे इन तरीकों सब बहुत अहम हैं भोली अगर आप मुझसे पूछें। :)
tchrist

यदि आप é को हटाते हैं, तो आप y को भी हटाना चाह सकते हैं।
उपयोगकर्ता अज्ञात

4
@ टीचर, प्रश्न पढ़ें। ए, ई, आई, ओ, यू को हटाने के लिए कहते हैं। आप विषय से दूर हैं, कृपया इसे छोड़ दें।
बूथबाई

1
@ टीचर: विशेष रूप से चुनौती ने "सभी स्वरों" को नहीं कहा और कहा कि हमें हटाने योग्य के रूप में विचार करना चाहिए।
उपयोगकर्ता अज्ञात

जवाबों:


2

बाइनरी व्हाट्सएप (2 अलग वर्ण, 324 कुल वर्ण)

TTSSSTTSSSSTTTSTTTSSSSSSTTSSSTSSSSSSTSTTSSSTSSSSTSSTSTTSSSTSSSTSSSTSTTSSSTSSSTSTSTSTSTTSSSTSSTSSTSSTSTTSSSTSTSSSSSTSTTSSSTSTSSSTSSTSTTSSSTSTSSTSSSTSTTSSSTSTSSTSTSTSTSTTSSSTSTSTSSTSSTSTTTTSSSTSTTSTTSTTTSSTSTTSSSSTTTSTSTSTSSSTSTTTSSTTTTSTTSTSTTTTSSTTTTTSSSTTTTSTTTTTTSSTSTTSSSSTTTSTSTSSTTSTTTSSSSTTTSTTSSTTSTTSTTTTSSSSTTTTTTTT

जहां S, T, L क्रमशः स्पेस, टैब, लाइनफीड को दर्शाता है। (बेशर्मी से बाइनरी व्हाट्सएप में "ब्रेडबॉक्स" द्वारा व्हॉट्सएप उत्तर को परिवर्तित करके प्राप्त किया गया - यह पोस्टिंग शायद उनके उत्तर के लिए एक टिप्पणी होनी चाहिए, लेकिन यह बहुत लंबा है।)

बाइनरी व्हाट्सएप व्हाट्सएप टी के बजाय टी का उपयोग करके और एल के बजाय टीटी का उपयोग करके हर जगह एक उपसर्ग-कोड भाषा में परिवर्तित किया गया है; जैसे जैविक हथियारों अनुदेश पुश करने के लिए -5 पर ढेर SSTSTSSTSTT बजाय SSTTSTL, आदि लिंक है: एक दोनों-तरीके एक मनमाना 3-प्रतीक भाषा और उसके द्विआधारी उपसर्ग कोड संस्करणों के लिए अनुवादक

NB: बाइनरी व्हाट्सएप कार्यक्रमों को बिट- परिणाम के रूप में माना जाता है , उदाहरण के लिए, चार-क्रम के बजाय (जैसे कि एस, टी अक्षर के बजाय 0,1 बिट-मानों का उपयोग करके) के लिए एक सच्चे बिटवाइज़ इंटरप्रेटर को डिजाइन करना सीधा होगा । इसके बाद एक 324- बिट प्रोग्राम होगा जिसमें 41 बाइट्स स्टोरेज की आवश्यकता होगी।


13

ब्रेनफक, 8 अलग (2121 कुल)

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

डिस्टिक्ट अक्षर <>+-[],.:। उन दुभाषियों के साथ काम करता है जिनके -1लिए उपयोग किया जाता है EOF

$ गूंज '
यह कार्यक्रम VOWELS को हटा देगा।
तो हम अब उनके बिना बोल सकते हैं।
'| bf vowel-rm.bf

Ths prgrm wll rmv VWLS।
S w cn nw spk wtht thm।


1
आवश्यकताओं के अनुसार, यह सबसे अच्छा उत्तर है; लेकिन OTOH यह सबसे खराब है कि यह अपनी भाषा में प्रत्येक वाक्य-रचना-महत्वपूर्ण चरित्र का उपयोग करता है ।
dan04

3
@ टिचर: यह ASCII मानता है। वैसे भी, केवल {ए, ई, आई, ओ, यू} आवश्यकताओं में हैं।
जॉन पर्पडी

1
तो यह बारी Renée’s naïvetéहै Rń’s n̈vt́, तो ठीक है ? यह मेरे लिए सही नहीं लगता है, लेकिन अगर आप ऐसा कहते हैं। के बाद से आप किसी भी सामान्य कल्पना नहीं कर सकते, यह पूरी तरह से उचित है कि Renée’s naïvetéवास्तव में "Rene\N{COMBINING ACUTE ACCENT}e\N{RIGHT SINGLE QUOTATION MARK}s nai\N{COMBINING DIAERESIS}vete\N{COMBINING ACUTE ACCENT}", या यदि आप जादू संख्या पसंद करते हैं - "Rene\x{301}e\x{2019}s nai\x{308}vete\x{301}"। यदि आप अपने परिचारक विकृति विज्ञान के बिना स्वरों को हटाते हैं, तो आपको अत्यधिक दुःख मिलता है। बहादुर नई सहस्त्राब्दी में आपका स्वागत है! :)
tchrist

1
Unary का उपयोग करें, आपके पास केवल एक विशिष्ट चरित्र होगा! :-P esolangs.org/wiki/Unary
मारीनस

3
@marinus, मैंने इसे Unary में बदल दिया है और 1.166921663690E+1824इसे स्टोर करने के लिए मुझे बस बाइट्स की जरूरत है (मैंने पास्टिबिन पर सटीक नंबर अपलोड किया है , यह इस टिप्पणी में फिट नहीं होगा)। मुझे आश्चर्य है कि इसे इस साइट पर भेजने में कितना समय लगेगा।
कोनराड बोरोस्की

10

व्हॉट्सएप, 3 अंक (218 वर्ण)

आपको पता था ऐसा होने वाला है।

↲___↲____↲⇥↲⇥_____↲___⇥_____⇥↲___⇥___⇥_⇥↲___⇥__⇥__⇥↲___⇥__⇥⇥⇥⇥↲___⇥_⇥_⇥_⇥
↲___⇥⇥____⇥↲___⇥⇥__⇥_⇥↲___⇥⇥_⇥__⇥↲___⇥⇥_⇥⇥⇥⇥↲___⇥⇥⇥_⇥_⇥↲↲___⇥↲_↲_↲⇥_⇥↲___
_↲⇥⇥⇥⇥__⇥↲⇥_↲↲_↲_⇥↲↲__↲↲⇥__↲↲_↲↲↲__⇥↲____↲⇥⇥⇥_↲_↲⇥___↲⇥↲__↲_↲_↲↲____↲↲↲↲

(_ = स्थान, ⇥ = टैब, = = newline)

यहाँ स्क्रिप्ट को base64 में एन्कोड किया गया है:

CiAgIAogICAgCgkKCSAgICAgCiAgIAkgICAgIAkKICAgCSAgIAkgCQogICAJICAJICAJCiAgIAkg
IAkJCQkKICAgCSAJIAkgCQogICAJCSAgICAJCiAgIAkJICAJIAkKICAgCQkgCSAgCQogICAJCSAJ
CQkJCiAgIAkJCSAJIAkKCiAgIAkKIAogCgkgCQogICAgCgkJCQkgIAkKCSAKCiAKIAkKCiAgCgoJ
ICAKCiAKCgogIAkKICAgIAoJCQkgCiAKCSAgIAoJCiAgCiAKIAoKICAgIAoKCgo=

और यहाँ दृश्यमान कोडांतरक के रूप में लिखा गया कार्यक्रम है:

ioloop: charin  0
        push    0, 'A', 'E', 'I', 'O', 'U', 'a', 'e', 'i', 'o', 'u'
ckloop: dup
        jz      out
        get     0
        sub
        jz      skip
        jump    ckloop
skip:   jz      ioloop
        jump    skip
out:    get     0
        dup
        jz      done
        charout
        jump    ioloop
done:   exit

एकमे जैसी गंध :: मुझे ब्लीच । :)
tchrist

जब मैं आपके "प्रतीकात्मक" प्रोग्राम को व्हॉट्सएप में परिवर्तित करता हूं, तो इसमें घातक सिंटैक्स त्रुटियां होती हैं।
रेस

अजीब है कि। क्या आपने रूपांतरण करने से पहले वास्तविक नईलाइन्स को निकालना याद किया? मुझे वास्तविक स्क्रिप्ट का एक बेस 64-एन्कोडिंग शामिल करना चाहिए।
ब्रेडबॉक्स

1
हां, मैंने ऐसा किया है - आपका बेस 64 संस्करण वास्तव में वही उपयोग कर रहा है जो मैं उपयोग कर रहा हूं। यहाँ एक "एसटीएल" संस्करण है (क्रमशः एस, टी, एल कोडिंग स्पेस, टैब, लाइनफीड के साथ) LSSSLSSSLTLTSSSSLSSSTSSSSSTLSSSTSSSTSTLSSSTSSTSSTLSSSTSSTTTTLSSSTSTSTSTLSSSTTSS‌​SSTLSSSTTSSTSTLSSSTTSTSSTLSSSTTSTTTTLSSSTTTSTSTLLSSSTLSLSLTSTLSSSLTTTTSSTLTSLLSLS‌​TLLSSLLTSSLLSLLLSSTLSSSLTTTSLSLTSSSLTLSSLSLSLLSSSSLLLL:। ऐसा प्रतीत होता है कि दो समस्याएं (दूसरों के बीच) हैं कि आप 0 का उपयोग SSSLकरने के बजाय स्टैक पर 0 पुश करने का प्रयास कर रहे हैं SSSSL, और इसके लिए "खाली" लेबल को परिभाषित करने का भी प्रयास कर LSSLरहे हैं skip
रेस

1
देरी के लिए क्षमा करें ... मैंने अभी पुष्टि की है कि वास्तव में व्हॉट्सएप दुभाषिया के एडविन ब्रैडी का संस्करण 0.3 (लिनक्स बाइनरी) वास्तव में शिकायत के बिना आपके कार्यक्रम को चलाता है। मैं रूबी कार्यान्वयन (उसी पृष्ठ पर उपलब्ध) का उपयोग कर रहा हूं, जो आपके द्वारा उपयोग किए जा रहे वाक्यविन्यास को अस्वीकार करता है।
रेस

8

SED (10 अलग-अलग बाइट्स, 13 कुल)

s/[aeIou]//gI

नमूना उपयोग:

echo The quick brown fox jumps over the lazy dOg. | sed -e s/[aeIou]//gI

आउटपुट:

Th qck brwn fx jmps vr th lzy dg.

बस सोच रहा था, Iअपरकेस क्यों है? यह कम काम करता है जब Iवर्ण कम होते हैं।
कोनराड बोरोस्की

2
@GlitchMr मैंने सिर्फ इतना करने के लिए कहा कि Iचरित्र का पुन: उपयोग किया जाता है।
क्रिस्टियन लुपस्कू

1
@tchrist मुझे नहीं लगता कि ओपी ने अपने पोस्ट में फ्रांसीसी स्वरों का उल्लेख किया है। इसके अलावा, मुझे भोले-भाले कार्यक्रम लिखना पसंद है। :-)
क्रिस्टियान लुपस्कू

3
मुझे पूरा यकीन है öऔर ïआपके उदाहरण में दुरुपयोग किया गया है और अन्य दो व्यंजन हैं। फिर भी, मुझे लगता है कि आपके पास एक बिंदु है। लेकिन इस तरह हम thist wayh͎e͓̥ṟ̼̞̰̠͔ ̞̝̮̕k̴̘̟̬̠i̴̘̟̬̠n̻͜d̫̺͔̠̭̖s̼ ̲͘o͈̺̝̭f̲͘ ͓̮v̳̙͔̝o͔̭̫͕͢ẃ̜͉̪̩̗e̻͔̺̬̣ĺs͖̭̮ का समर्थन कर सकते हैं; शायद यहां तक ​​कि, slıoʌ uʍop ,,pısdn ,, :-)
क्रिस्टियन

1
@ w0lf, का उपयोग करता है öऔर ïएक बार अंग्रेजी में पाए गए थे, हालांकि वे अब लगभग गायब हो गए हैं।
जो

7

सी, 22 20 19 अलग-अलग वर्ण।

पत्र main, के लिए आवश्यक putchar, getchar= 12.
विराम चिह्न - (){};= 5.
संचालक - &-= 2।

i;ii;
p(c){
    (c&ii-(-ii-ii))-(i-ii-ii-ii-ii-ii-ii)&&
    (c&ii-(-ii-ii))-(i-ii-ii-ii-ii-ii-ii-i-i-i-i)&&
    (c&ii-(-ii-ii))-(i-ii-ii-ii-ii-ii-ii-ii-(-i-i-i))&&
    (c&ii-(-ii-ii))-(-ii-ii-ii-ii-ii-ii-ii-i-i)&&
    (c&ii-(-ii-ii))-(i-ii-ii-ii-ii-ii-ii-ii-ii-(-i-i))&&
    putchar(c);
}
a(c){c-i&&n(p(c));}
n(c){a(getchar());}
main(){
    n(i---ii---ii---ii---ii---ii---ii---ii---ii---ii---ii---ii---i);
}

mainअपरिभाषित व्यवहार को आमंत्रित करता है ( --एक पंक्ति में बहुत अधिक )।
मैं अभिव्यक्ति मूल्य के बारे में परवाह नहीं है, और यह iiसमय की सही संख्या में कमी करता है ।
के साथ गिरावट को अलग करके आसानी से तय किया जा सकता है ;। लेकिन यह बहुत अच्छा है क्योंकि यह है।

पुराना संस्करण, 20 वर्ण:
वास्तव में 21, क्योंकि मैंने ध्यान नहीं दिया कि कुछ स्थान महत्वपूर्ण हैं और उन्हें गिना जाना चाहिए, लेकिन उन्हें आसानी से कोष्ठक से प्रतिस्थापित किया जा सकता है।

ii;iii;c;a;
main(i){
    i=c;i-=--c;
    ii=-i-i-i-i-i-i-i-i-i-i-i;
    iii=i-ii-ii-ii-ii-ii-ii-ii-ii-ii-ii;
    -(c=a=getchar())-i&&main(
        (c&=ii- -ii- -ii)- -            a&&
        -ii-ii-ii-ii-ii-ii-  i-         c&&
        -ii-ii-ii-ii-ii-ii- -i- -i- -i- c&&
        iii- -ii- -ii- -ii-  i-i-i-i-i- c&&
        iii- -ii- -ii- -ii- -i-         c&&
        iii- -ii- -ii-       i-i-i-i-   c&&
        putchar(a));
}

संभवत: इसका संकलन करके gcc -nostartfilesऔर इसका नाम बदलकर आगे सुधार किया जा सकता mainहै _startminहटाए गए (कुछ चर नाम बदलने के बाद), _sजोड़े गए। लेकिन फिर मुझे उपयोग करने की आवश्यकता है exit(), जो 3 वर्ण जोड़ता है।
इसके बजाय _start, किसी भी नाम का उपयोग किया जा सकता है, और यह लिनक्स में काम करता है। यह 18 वर्णों तक नीचे जाने की अनुमति देता है, लेकिन बहुत ही गैर-मानक है।


6

पर्ल: 8 या 10 अलग-अलग वर्ण

s/// समाधान: 10 अलग, 13 कुल

(कथित; नीचे देखें) sed तकनीक हमेशा पेर्ल में भी काम करती है, और अलग-अलग वर्णों के नाम की संख्या प्राप्त करती है (10):

s/[aeiou]//gi

उदाहरण के लिए:

$ echo 'This program will remove VOWELS. So we can speak without them.' | 
  perl -ple 's/[aeiou]//gi'
Ths prgrm wll rmv VWLS. S w cn spk wtht thm.

यह साबित होता है कि 10 अलग-अलग वर्ण हैं:

$ echo 's/[aeiou]//gi' | perl -nle '@s{split//}=(); print scalar keys %s'
10

Sed समाधान के साथ समस्या यह है कि अपनी है /iहै नहीं POSIX का हिस्सा sed, और इस तरह पोर्टेबल नहीं है:

$ echo 'This program will remove VOWELS. So we can speak without them.' | 
  sed -e 's/[aeiou]//gi'
sed: 1: "s/[aeiou]//gi": bad flag in substitute command: 'i'

यह एक OpenBSD सिस्टम पर चल रहा है। इसके विपरीत, क्योंकि /iवास्तव में हमेशा मानक पर्ल का हिस्सा होता है, आप हमेशा इसके होने पर भरोसा कर सकते हैं । सेड के विपरीत।

यदि आप स्वरों की सूची में "y" शामिल करना चाहते हैं, तो यह निश्चित रूप से एक ही है यदि आप एक ही तकनीक का उपयोग करते हैं:

$ echo 'This nifty program remove any VOWELS. So we easily can speak without them.' | 
  perl -ple 's/[aeiouy]//gi'
Ths nft prgrm rmv n VWLS. S w sl cn spk wtht thm.

$ echo 's/[aeiouy]//gi' | perl -nle '@s{split//}=(); print scalar keys %s'
11

और यह अब कुल 14 वर्ण हैं।

tr[][] समाधान: 8 अलग 10 कुल

आप tr///कुछ भी मैच से हटाने के लिए उपयोग कर सकते हैं । पर्ल यहां तक ​​कि sed के y///उपनाम का उपयोग कर सकते हैं tr:

y/aeiou//d

जो अब 8 अलग अक्षर है, लेकिन अपरकेस पर काम नहीं करता है। आप अंत में कैसमैप से निपटने के लिए 5 और पात्रों को जोड़ना चाहते हैं:

$ echo 'y/aeiouAEIOU//d' | perl -nle '@s{split//}=(); print scalar keys %s'
13

और निश्चित रूप से अब यह कुल 15 है।

हालाँकि, स्वर के रूप में मिश्रण में "y" जोड़ने से विभिन्न वर्णों की संख्या नहीं होती है जैसा कि s///संस्करण के साथ किया गया था:

$ echo 'This nifty program remove any VOWELS. So we easily can speak without them.' | 
  perl -ple 'y/aeiouy//d'
Ths nft prgrm rmv n VOWELS. S w sl cn spk wtht thm.

तो यह अभी भी मूल 8 कुल 11 में से अलग है:

$ echo 'y/aeiouy//d' | perl -nle '@s{split//}=(); print scalar keys %s'
8

EDIT : डीआइट्रीटिक्स के लिए लेखांकन

और इनपुट्स के बारे में क्या Renée’s naïveté? सही आउटपुट बेशक होना चाहिए Rn’s nvt। यहां बताया गया है कि v5.14 के /rझंडे का उपयोग कैसे करें s///:

$ echo 'Renée’s naïveté' |
  perl5.14.0 -CS -MUnicode::Normalize -nle 'print NFD($_)=~s/[aeiou]\pM*//rgi'
Rn’s nvt

यह 27 अलग-अलग वर्ण हैं:

$ echo 'print NFD($_) =~ s/[aeiou]\pM*//rgi' | 
  perl -nle '@s{split//}=(); print scalar keys %s'
27

आप इसे 26 तक ट्रिम कर सकते हैं यदि आप गारंटी दे सकते हैं कि आप कम से कम v5.10 के printलिए स्वैप कर रहे हैं say:

$ echo 'Renée’s naïveté' |
  perl -Mv5.14 -CS -MUnicode::Normalize -nlE 'say NFD($_) =~ s/[aeiou]\pM*//rgi'
Rn’s nvt

$ echo 'say NFD($_) =~ s/[aeiou]\pM*//rgi' | 
  perl -nle '@s{split//}=(); print scalar keys %s'
26

और आप इसे 22 तक नीचे ला सकते हैं यदि आप उन्हें हटाने के बजाए डाइटिट्रिक्स को स्थानांतरित करने से इनकार नहीं करते हैं:

$ echo 'Renée’s naïveté' |
  perl -Mv5.14 -CS -MUnicode::Normalize -nlE 'say NFD($_) =~ s/[aeiou]//rgi'
Rń’s n̈vt́

कौन सा है ... देखने में दिलचस्प , कम से कम कहने के लिए। :) यहां इसकी विशिष्ट-गणना है:

$ echo 'say NFD($_) =~ s/[aeiou]//rgi' | 
  perl -nle '@s{split//}=(); print scalar keys %s'
22

सौभाग्य की बात है कि किसी भी अन्य भाषा को इससे कम पात्रों का उपयोग करते हुए विकृति विज्ञान से ठीक से निपटने के लिए!


1
β β αβουτ 𝐝𝐢𝐚𝐜𝐫𝐢𝐭𝐢𝐜𝐬 𝒈𝒐𝒕 β 𝒷𝓋𝓉, β β β β β β?
बंद हो गया

@leftractionabout एक NFKD अपघटन के लिए प्रतिबद्ध है। यूनानियों की गिनती हालांकि वे लुकलेस नहीं हैं, और स्मालकैप नियमित रूप से विघटित नहीं होते हैं। परिणाम है "ɢᴏᴏᴅ ᴘnt αβουτ dcrtcs y gt thr, bvt hw bt stff lk THS", या "\N{LATIN LETTER SMALL CAPITAL G}\N{LATIN LETTER SMALL CAPITAL O}\N{LATIN LETTER SMALL CAPITAL O}\N{LATIN LETTER SMALL CAPITAL D} \N{LATIN LETTER SMALL CAPITAL P}nt \N{GREEK SMALL LETTER ALPHA}\N{GREEK SMALL LETTER BETA}\N{GREEK SMALL LETTER OMICRON}\N{GREEK SMALL LETTER UPSILON}\N{GREEK SMALL LETTER TAU} dcrtcs y gt thr, bvt hw bt stff lk THS"
tchrist

लेकिन क्या कुछ लैटिन स्वर हैं, जिनमें अनुकूलता के विघटन नहीं हैं, जैसे कि ø
dan04

5
चुनौती डायक्टिक्स के साथ स्वरों को हटाने के लिए नहीं कहती है - बस ए, ई, आई, ओ, यू - तो Renée’s naïvetéदेना चाहिए Rné’s nïvté
बूथ

2
ह्युमन पार्सल्स की गणना क्यों नहीं की जाएगी, अगर äèűó (आदि ([ए, ई, आई, ओ, यू] में नहीं!) करते हैं? या सिरिलिक, उस मामले के लिए (जो लुकलेस नहीं हैं, लेकिन निश्चित रूप से पर्याप्त स्वर)।
को चालू करना बंद कर दिया

5

GolfScript (7 अलग-अलग बाइट्स, कुल 103)

W0lf के जवाब पर पर्याप्त सुधार करने के बाद मुझे लगता है कि यह एक अलग के रूप में योग्य है:

[9-99))--9+99))99))))))99)9+))9-9)99--)99-9+9--9+9-))99-9+9)))--9+99-9+-9+9-)99-9+9)))-)99)9-9-)))]''+-

12 अलग-अलग बाइट्स, 13 कुल:

'aeiouAEIOU'-

महान! काश मैं तुम्हें फिर से उभार सकता।
क्रिस्टियन लुपस्कू

4

गोल्फस्क्रिप्ट (8 अलग-अलग बाइट्स, 837 कुल)

[9)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) 9)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) 9)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) 9)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) 9)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) 9)))))))))))))))))))))))))))))))))))))))))))))))))))))))) 9)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) 9)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) 9)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) 9))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))]''+-

स्पष्टीकरण:

  1. कार्यक्रम पूर्णांक मानों के निम्नलिखित सरणी बनाता है: [97 101 105 111 117 65 69 73 79 85](ASCII कोड के अनुरूप a,e,i,o,u,A,E,I,O,U)। प्रत्येक संख्या को स्टैक वैल्यू पर पुश करके दर्शाया गया है 9, इसके बाद )(वेतन वृद्धि ऑपरेटरों) की आवश्यक संख्या । उदाहरण के लिए, संख्या और 58 s 67का उपयोग करके प्राप्त किया जाता है9)
  2. उपयोग करके ''+, सरणी को "a,e,i,o,u,A,E,I,O,U"सभी स्वरों का प्रतिनिधित्व करते हुए, स्ट्रिंग में परिवर्तित किया जाता है
  3. घटाव का चिन्ह ('-') तब स्रोत स्ट्रिंग से सभी स्वरों को घटाने के लिए उपयोग किया जाता है

8 अनन्य अक्षर हैं जो इस्तेमाल किया गया: [, ], 9, ), +, -, 'और(space)


4

अपठनीय (2 अलग, 2666 कुल)

चूँकि हर कोई ट्यूरिंग टारपिट्स पोस्ट कर रहा है, मैंने सोचा कि मैं इसका उपयोग करूँगा। यह बहुत अच्छी तरह से ज्ञात नहीं है, लेकिन यह मौजूद है ( http://esolangs.org/wiki/Unreadable ) और इसमें केवल दो अक्षर हैं।

'""""'""""'""""'""""""'"""'""'""'""'""'""'""'""'""'""'"""'""""'"""""'"""""""'"""'""""'"""
"'""""'""""""'"""'""""""""'"""""""'"""'""""""'""'"""'""'""'""'""'""'""'"""""""'""'"""'"""
"'""""""'""'""'"""'""'""'""'""'""'""'""'"""""""'""'""'"""'""""""'""'""'""'"""'""'""'""'""
'""'""'""'""'"""""""'""'""'""'"""'""""'""""'""""""'""'""'""'""'"""'""'""'""'""'""'""'""'"
"'""'"""""""'""'""'""'""'"""'""""""'""'""'""'""'""'"""'""'""'""'""'""'""'""'""'""'""'""""
"""'""'""'""'""'""'"""'""""'""""""'""'""'""'""'""'""'"""'""'""'""'""'""'""'""'""'""'""'""
'"""""""'""'""'""'""'""'""'"""'""""""'""'""'""'""'""'""'""'"""'""'""'""'""'""'""'""'""'""
'""'""'""'"""""""'""'""'""'""'""'""'""'"""'""""""'""'""'""'""'""'""'""'""'""'""'"""'"""""
"""'""""""""'"""""""'""'""'""'""'""'""'""'"""'""""'""""""'""'""'""'""'""'""'""'""'""'"""'
""'""'"""""""'""'""'""'""'""'""'"""'""""'""""""'""'""'""'""'""'""'""'""'"""'""""""""'""""
""""'""""""""'""""""""'"""""""'""'""'""'""'""'""'"""'""""""'""'""'""'""'""'""'""'"""'""'"
"'"""""""'""'""'""'""'""'"""'""""'""""'""""""'""'""'""'""'""'""'"""'""""""""'""""""""'"""
""""'""'""'""'""'""'"""'""""'""""""'""'""'""'""'""'"""'""""""""'""""""""'""""""""'"""""""
"'"""""""'""'""'""'""'"""'""""""'""'""'""'""'"""'"""""""'""'""'""'"""'""""'""""'""""""'""
'""'""'"""'""'""'""'""'"""""""'""'""'"""'""""""'""'"""'""'""'""'""'""'""'"""""""'""'"""'"
"""'""""""'"""'""'""""""""""'"""""'"""""""'"""'""""'""""'""""""'""'""'""'""'""'""'""'""'"
"'""'""'"""'""'""'""'""'""'""'""'""'""'""'"""'""""""'""'""'""'""'""'""'""'""'""'""'""'""'
"""'""""""""'"""'""""'"""""""""'""""""""'"""""""'""'""'""'""'""'""'""'""'""'""'""'"""'"""
""'""""""""'"""""""'""'""'""'""'""'""'""'""'""'""'""'"""'""""'""""'""""""'""'""'""'""'""'
""'""'""'""'""'""'""'""'"""'"""""""'"""'""""""'""'""'""'""'""'""'""'""'""'""'""'""'""'""'
"""'"""""""'"""""""'""'""'""'""'""'""'""'""'""'""'""'"""'""""'"""""""""'"""""""'""'""'""'
""'""'""'""'""'""'""'""'""'""'""'"""'"""""'"""""""'""'""'""'""'""'""'""'""'""'""'""'""'""
'""'"""'""""'""""""'""'""'""'""'""'""'""'""'""'""'""'""'""'""'"""'""""""""'"""""""'""'""'
""'""'""'""'""'""'""'""'""'""'""'""'"""'""""""'""'""'""'""'""'""'""'""'""'""'""'""'""'"""
'""""""""'"""""""'""'""'""'""'""'""'""'""'""'""'""'""'""'"""'"""'""""'"""""""""'"""""""'"
"'""'""'""'""'""'""'""'""'""'""'""'""'"""'""""""'""'""'""'""'""'""'""'""'""'""'""'""'"""'
""'"""""""'""'""'""'""'""'""'""'""'""'""'""'""'"""'"""'""""""'""'""'""'""'""'""'""'""'""'
""'""'"""'""""""""'"""""""'""'""'""'""'""'""'""'""'""'""'""'"""'"""'""""'"""""""""'""""""
""'""""""""'""""""""'""""""""'""""""""'""""""""'""""""""'""""""""'""""""""'"""""""'""'""'
""'""'""'""'""'""'""'""'""'""'"""'"'""""""""'"""""""'"""'"""'""""""'"""'""'""""""""""

(+1) अच्छा ... मैंने इसे आपके दुभाषिया से सत्यापित किया । क्या यह अभी भी "अप्राप्त" माना जाता है, भले ही इस भाषा के निर्माता ने इसे मंजूरी दी हो ? (यह एक शर्म की बात है कि भाषा दो खाली स्थान के एकल और डबल उद्धरण के बजाय अक्षरों का उपयोग परिभाषित नहीं किया गया लगता है, ओ)))
रेस

@res जिसे लागू करना कठिन नहीं होना चाहिए। बस दो व्हाट्सएप चुनें और दुभाषिया को संशोधित करें ताकि यह व्हाट्सएप को सिंगल और डबल-कोट्स को पहले से बदल दे!
कॉमफ्रीक

2

VBA - 25 22 अलग-अलग बाइट्स (कुल 120)

मुझे पता है कि यह इतने सारे अलग-अलग बाइट्स के साथ नहीं जीतेगा, लेकिन यहाँ यह VBA में है।

(space), (newline), ", ,, (, ), =, a, b, c, d, e, E, I, l, n, O, p, R, S, u,1

Sub S(u)
u=Replace(Replace(Replace(Replace(Replace(u,"u","",,,1),"O","",,,1),"I","",,,1),"e","",,,1),"a","",,,1)
End Sub

* ,,,1मामले की अनदेखी करने की अनुमति देता है। ( 1निरंतर का प्रतिनिधित्व करता है vbTextCompare)


आप गिनती नहीं Eमें End Sub। लेकिन यह बहुत अच्छा है, यह बुनियादी है।
चालू करना बंद कर दिया

@leftaroundabout धन्यवाद! बिल्कुल सही है E, और मैंने सही किया है। मुझे लगता है कि मैं सब के मांस के बारे में बहुत चिंतित था। ;-)
गफ्फ़ी

दरअसल, VBA के रूप में एक भाषा ऑटोफॉर्माटिंग को सपोट करती है, आप अपने उत्तर को सभी निचले (या ऊपरी) केस में बदल सकते हैं और VBA इसके लिए सही होगा, और क्योंकि यह स्वीकार किया जाता है कि ऑटोफॉर्मेटिंग के आने से पहले भाषाओं को ऑटोफॉर्मेट करने पर विचार किया जा सकता है। इसका मतलब होगा कि आप eया तो E
टेलर

आप ?Replace(Replace(Replace(Replace(Replace(cells(1,1),"u","",,,1),"O","",,,1),"I","",,,1),"e","",,,1),"a","",,,1)इसे मेरी विंडो 18 डिस्टिक्ट बाइट्स ?Replace(s1,)"uOIऔर 111 बाइट्स कुल
टेलर स्कॉट

1

अजगर 3.x, 19 अलग-अलग वर्ण, 62 कुल

print(''.join(x for x in input() if x.lower() not in 'aeiou'))

इनपुट पर ठीक से काम नहीं करता है Renée’s naïveté, आप जानते हैं।
प्रातः


1

के, 29. (18 अलग-अलग बाइट्स)

{i@&~(i:0:0)in(_i),i:"AEIOU"}

अलग-अलग बाइट्स: {@ & ~ (: 0) _, "AEIOU} में

k){i@&~(i:0:0)in(_i),i:"AEIOU"}`
Hello WoOOrld
"Hll Wrld"

1

एएसएम - 6 अलग-अलग वर्ण 520 स्रोत वर्ण (MsDOS .com)

A86 का उपयोग करके इकट्ठे हुए

db 10110100xb
db 00000110xb
db 10110010xb
db 11111111xb
db 11001101xb
db 00100001xb
db 01110101xb
db 00000001xb
db 11000011xb
db 10001010xb
db 11010000xb
db 10111110xb
db 00011101xb
db 00000001xb
db 10111001xb
db 00001010xb
db 00000000xb
db 01000110xb
db 00101010xb
db 00000100xb
db 01110100xb
db 11101010xb
db 11100010xb
db 11111001xb
db 10110100xb
db 00000110xb
db 11001101xb
db 00100001xb
db 11101011xb
db 11100010xb
db 01000001xb
db 00000100xb
db 00000100xb
db 00000110xb
db 00000110xb
db 00001100xb
db 00000100xb
db 00000100xb
db 00000110xb
db 00000110xb

मशीन की भाषा में लिखिए, यह दो अलग-अलग अक्षर होंगे।
बदसूरत

1

MATL, 8 बाइट्स (सभी विशिष्ट)

t13Y2m~)

इसे MATL ऑनलाइन पर आज़माएं

बस एक सीधे ऊपर गोल्फ, वास्तव में अद्वितीय bytecount को कम करने के लिए पात्रों का पुन: उपयोग करने के लिए कोई चाल नहीं मिली।

13Y2एक शाब्दिक युक्त है aeiouAEIOU

tइनपुट स्ट्रिंग का एक डुप्लिकेट ई लें , एक तार्किक (बूलियन) सरणी बनाएं जो यह दर्शाता है कि इनपुट के कौन से अक्षर नहीं हैं ( ~) mउन शाब्दिक, और इंडेक्स ( )) उन स्थानों पर, केवल गैर-स्वर वर्णों की एक सरणी वापस करने के लिए।


0

PHP - 30 अलग-अलग बाइट्स

<?=preg_replace('/[aeiou]/i','',fgets(STDIN));

1
आप में नहीं बदल /[aeiou|AEIOU]/सकता है /[aeiou]/i? साथ ही, आपका कोड भी |गायब हो जाता है।
कोनराड बोरोस्की

0

बैश 26 अलग, 37 कुल

c=$(cat -)
echo "${c//[aeiouAEIOU]/}"

सॉर्ट किया गया:

""$$()-///=AEIOU[]aacccceehiootu{}"

scala> code.toList.distinct.length
res51: Int = 26

scala> code.length
res52: Int = 37

"
  ""$$()-///=AEIOU[]aacccceehiootu{}"


scala> code.distinct.sorted 
res56: String = 
"
 "$()-/=AEIOU[]acehiotu{}"

परिणाम (रेखांकन सुरक्षित रखता है):

echo "This program will remove VOWELS.
So we can now speak without them." | ./cg-6025-remove-vowels.sh
Ths prgrm wll rmv VWLS.
S w cn nw spk wtht thm.

ट्रे के लिए, यह स्पष्ट नहीं है कि कैसे गिनें: '-d aeiouAEIOU' 10 या 13 के रूप में:

echo "This program will remove VOWELS.
So we can now speak without them." | tr -d aeiouAEIOU

मैंने tr का उपयोग करने पर विचार किया, लेकिन मैंने निष्कर्ष निकाला कि चूंकि यह एक प्रोग्रामिंग भाषा नहीं है, इसलिए इसे एक शेल में लपेटना होगा, इसलिए यह tr -d aeiouAEIOU15. के लिए पूर्ण पाठ की गिनती करेगा
पीटर टेलर

16 <! - char-दहलीज-जिम्नास्टिक ->
उपयोगकर्ता अज्ञात

15 अलग, 16 कुल।
पीटर टेलर

0

पायथन (23)

किसी को तो करना ही था।

print filter(lambda x:x not in'aeiou',raw_input())

3
जिसमें "केवल" 23 विशिष्ट वर्ण हैं। लेकिन अपरकेस स्वर पर काम करने में विफल रहता है।
करना बंद कर दिया

एक नए वर्ण को जोड़कर और चर को x से c या s में बदलकर आप लोअरकेस () (अपरकेस) का उपयोग कर सकते हैं और अपरकेस स्वरों के साथ भी व्यवहार कर सकते हैं।
fabikw

0

F # 105 121 91 वर्ण

Console.ReadLine()|>Seq.filter(fun c->not("aeiouAEIOU".Contains(c)))|>Seq.iter(printf"%c")

हम्मम ... मैंने अभी देखा कि यह कोड लिनकैप में काम करेगा, लेकिन विजुअल स्टूडियो में नहीं। और जब से मुझे अपना योगदान देने का मन नहीं हो रहा है, मैं इसे इस टिप्पणी के साथ यहाँ छोड़ दूंगा, जब तक मैं यह पता नहीं लगा लेता कि इसमें क्या गलत है।
स्मिताड अनारकिस्ट

0

एक्सेल फॉर्मूला - 19 अलग-अलग बाइट्स (196 कुल)

=, S, B, T, (, ), ,, ", a, e, i, o, u, A, E, I, O,U ,1

Cell A1: <Value>
Cell B1: =SUBSTITUTE(SUBSTITUTE(A1,"a",""),"e","")
Cell C1: =SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(B1,"i",""),"o",""),"u",""),"A",""),"E",""),"I",""),"O",""),"U","")

* यह वास्तव में एक्सेल 2003 में काम करने के लिए बहुत अधिक नेस्टेड फ़ंक्शन हैं, लेकिन अवधारणा वहां है।

सूत्रों को दो कोशिकाओं में विभाजित करने से वांछित प्रभाव प्राप्त हुआ। - परिणाम C1 में है।



0

के (ओके) , 16 बाइट्स, 14 अलग

समाधान:

^[;v,_v:"AEIOU"]

इसे ऑनलाइन आज़माएं!

स्पष्टीकरण:

^स्वरों को छानने के लिए छोड़कर ( ) का उपयोग करना ।

^[;v,_v:"AEIOU"] / the solution
^[;            ] / except (^) projection
      v:"AEIOU"  / save vowels as v
     _           / lowercase (_), "AEIOU" => "aeiou"
    ,            / join (,)
   v             / uppercase vowels
हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.