বর্ণমালার ভারসাম্য


15

এমন একটি প্রোগ্রাম লিখুন যা তার ইনপুট হিসাবে একটি স্ট্রিং পায় এবং এতে বর্ণানুক্রমিক এবং অ-অক্ষরীয় অক্ষরের সংখ্যা গণনা করে। এটি এর ফলাফলটি এভাবে প্রদর্শন করতে হবে:

ইনপুট: http://stackexchange.com
আউটপুট:20 + 4 = 24

ক্যাচটি হ'ল, আপনার উত্স কোডটিতে অ্যালফানিউমেচারিক অক্ষরের মতো বর্ণমালার অক্ষরের সমান সংখ্যা থাকতে হবে। মন্তব্য অনুমোদিত নয়, সাদা স্থান উপেক্ষা করা হয়। ( হোয়াইটস্পেস নামক ভাষাটি ভোটের জন্য প্রতিযোগিতা করতে পারে তবে বিজয়ী হিসাবে নির্বাচিত হবে না, স্পষ্টতই)

কোডের অক্ষরের অবশ্যই কমপক্ষে কিছুটা ন্যায্য সমর্থনযোগ্যতা থাকতে হবে, সেগুলি পুরোপুরি অতিরিক্তভাবে প্রয়োজন হবে না । উদাহরণস্বরূপ, এর i = (j*3)+4;পরিবর্তে দীর্ঘতর চলক নামগুলিও অনুমোদিত i = j*3+4;allowed যাইহোক, i = i + 1;;;;;;না।

এগুলি ছাড়াও স্ট্যান্ডার্ড কোড-গল্ফ বিধি প্রযোজ্য।


যদি আমি ওক্ এর একটি নতুন, preprocessed বৈকল্পিক যেখানে কিওয়ার্ড সংজ্ঞায়িত O., O?এবং O!এবং তারপর কোনো প্রোগ্রাম আমি লিখি চরিত্র শ্রেণী সীমাবদ্ধতা পূরণ করে ... অবশ্যই এটা সম্ভবত দৈর্ঘ্য ব্যবসা হারান।
ডিএমকেই --- প্রাক্তন-মডারেটর বিড়ালছানা

2
সব কি আসকি হবে?
জর্ডন বিওনদো

@ জর্ডন বিয়নদো: আমি ইউনিকোডে পূর্ণ 8 বিট এএনএসআই থেকে যা কিছু চাইবে তা ভেবেছিলাম, তবে যদি আপনার কোডটি কেবল 7 বিট এএসসিআইআই সমর্থন করে, আমি এটিও গ্রহণ করব।
বনাম

3
আউটপুট-স্ট্রিংয়ের অভ্যন্তরে শ্বেত স্থানটি কি অ-অক্ষর হিসাবে গণনা করা হয়? বা অন্য সমস্ত (নন-স্ট্রিং-আক্ষরিক) সাদা স্পেস দিয়ে উপেক্ষা করবেন?
নিন্নুগ

1
@ ডিএমকে: আপনি যদি নিজের নিজের ভাষা সংজ্ঞায়িত করতে চান তবে কেবল আপনার পছন্দের ভাষার একটি বৈকল্পিক নির্ধারণ করুন যেখানে খালি খালি প্রোগ্রামগুলি বেস ভাষা হিসাবে ঠিক কাজ করে, তবে খালি প্রোগ্রামটি কোডে প্রিপ্রোসেসড থাকে যা ঠিক কী করে প্রশ্ন জিজ্ঞাসা।
ব্যবহারকারী 2357112 0:56

উত্তর:


8

পার্ল, 32 + 32 = 64

স্ট্রিংটি STDIN এ প্রত্যাশিত। আউটপুটটি STDOUT এ লেখা হয়। সাদা স্থান উপেক্ষা করা হয়। আমার কার্যটির ব্যাখ্যাটি হ'ল স্কোরটি পাওয়ার জন্য প্রোগ্রামটি নিজেই চালানো উচিত।

$/ = $,;
$_ = <>;
s x\sxxg;
$\ = length;
print s x[0-9a-z]xxgi,
      ' + ',
      s x.xxg,
      ' = '

মন্তব্যে অসম্পূর্ণ

$/ = $,; # The input separator becomes undefined, because the default for $, is "undef"
$_ = <>; # now $_ takes the whole file (STDIN) instead of the first line
s x\sxxg; # $_ =~ s/\s//g;
          # white space is removed from $_
$\ = length; # The number of the other characters are put into $\,
             # which is automatically printed the end of "print".
print s x[0-9a-z]xxgi, # s/[0-9a-z]//gi
                       # Remove alphanumeric characters and return their count
      ' + ',
      s x.xxg, # s/.//g
               # Remove the remaining special characters and return their count.
               # "." does not catch new lines, but we have already
               # removed white spaces including new lines.
      ' = '

আমি একই বাইট গণনা সহ বেশ কয়েকটি প্রকরণ পেয়েছি, যেমন:

$/ = $x;
$_ = <>, s x\sxxg;
$\ = split $x;
print s x[\da-z]xxgi,
      " + ",
      s x.xxg,
      ' = '

উদাহরণ

  • প্রশ্ন থেকে উদাহরণ:

    echo 'http://stackexchange.com' | perl a.pl
    20 + 4 = 24
  • নিজেই চলছে ( a.pl):

    cat a.pl | perl a.pl
    32 + 32 = 64

    ফাইলের আকার 104 বাইট, সুতরাং 40 বাইট সাদা স্থান হিসাবে অগ্রাহ্য করা হয়।

পার্ল, 29 + 29 = 58

$_=<>;s x\sxxg;$\=length;print s x[0-9a-z]xxgi,' + ',s/.//g,' = '

স্ট্রিংটি STDIN এ প্রত্যাশিত এবং এটি প্রথম লাইনে সীমাবদ্ধ। ফলাফলটি STDOUT এ মুদ্রিত হয়। সাদা স্থান উপেক্ষা করা হয়।

Ungolfed

$_ = <>;
s x\sxxg; # same as s/\s//gx; removes white space;
$\ = length($_); # sum is automatically appended at the end of print
print sx[0-9a-z]xxgi, # same as s/[0-9a-z]//gi;
                      # the number of alphanumeric characters
      ' + ',
      s/.//g, # the number of the remaining special characters
      ' = '

উদাহরণ

ফাইলটিতে a.plপার্ল স্ক্রিপ্ট রয়েছে।

  • প্রশ্ন থেকে উদাহরণ:

    echo 'http://stackexchange.com' | perl a.pl
    20 + 4 = 24
  • নিজেই চলছে:

    cat a.pl | perl a.pl
    29 + 29 = 58

    ফাইলের আকার a.pl65 বাইট, সুতরাং 7 বাইট সাদা স্থান হিসাবে অগ্রাহ্য করা হয়।


দেখে মনে হচ্ছে আপনি ইনপুটটি কেবলমাত্র এক লাইনে রয়েছে ... আমি অনুমানটির মধ্যে কিছুই দেখিনি? এছাড়াও, প্রথম প্রতিস্থাপনে / এক্স পতাকাটির যৌক্তিকতা কী?
skibrianski

@ এসকিবারিয়ানস্কি: (ক) "স্ট্রিং" এর নির্দিষ্টকরণ সম্পর্কে প্রশ্নটি খুব পরিষ্কার নয়। এখন আমি একটি বৈকল্পিক যুক্ত করেছি যা পুরো ফাইলগুলি পড়তে পারে। (খ) এছাড়াও স্ক্রিপ্ট দ্বারা সাদা স্থান কীভাবে আচরণ করা উচিত তা আমার কাছে স্পষ্ট নয়। আমার ব্যাখ্যাটি হ'ল শ্বেত স্থানটি কার্য এবং স্কোর উভয় ক্ষেত্রেই উপেক্ষা করা হয়। (গ) / এক্স পতাকা প্যাটারনে সাদা স্থানকে পাঠযোগ্যতা বাড়ানোর অনুমতি দেয়। আপডেট করা উত্তর এটি ব্যবহার করে।
হাইকো ওবারডিক

পুনরায়), লেখক স্ট্রিংয়ের মধ্যে কী হবে সে সম্পর্কে কিছুই বলেন না, তাই অনুমান করা বুদ্ধিমানের মতো হবে না, যার অর্থ আমার কাছে নিউলাইনগুলিকে অনুমতি দেওয়া উচিত। রে খ) সম্মত হয়েছে, এটি পরিষ্কার নয়। গ) ঠিক আছে, তবে আপনার উত্তরে সাদা অংশটি আমার চোখে পড়ার ক্ষমতা যোগ করে না, এটি কেবল একটি বর্ণমালার চরিত্র যুক্ত করে ... সম্ভবত আমি এই বিষয়টিতে খুব কঠোর হচ্ছি, তবে এটি আমার কাছে প্রকাশ করছে যে আপনি কেবল / এক্স ব্যবহার করেন আপনার রেগেক্সগুলির মধ্যে একটিতে সম্ভবত এটি সংখ্যার সারিবদ্ধ করার জন্য একটি অতিরিক্ত অতিরিক্ত বর্ণানুক্রমিক যুক্ত করা =) তবুও আমি আপনার উত্তরটি পছন্দ করি। আমি বেশ কিছু অনুরূপ রান্না আপ।
skibrianski

হা হা এখন আমাদের কাছে মূলত অভিন্ন কোড =) ভাল শো =)
স্কিবিরিয়ানস্কি

@ এসকিবারিয়ানস্কি: :-) ধন্যবাদ, আপনি আমাকে আরও কিছু পার্থক্য সহ অন্য একটি রূপ পোস্ট করার কারণ দিয়েছেন। তবে বাইট গণনা বাকি আছে।
হাইকো ওবারডিক

6

সি - 96 (48 + 48) অক্ষর

এটি কিছুটা পাঠযোগ্য। যদিও উন্নতির জন্য জায়গা আছে।

i,j;main(_){while((_=getchar())>=0)isspace(_)||(isalnum(_)?i++:j++);printf("%i + %i = %i",i,j
,i+j);}

5

বাশ + কোর্টিলস, 72 (36 + 36) অ-সাদা অংশের অক্ষর

a=`tr -dc [:alnum:]<<<$1|wc -c`
n=`tr -dt [:space:]<<<$1|wc -c`
echo $a + $[n-a] = $n

আউটপুট:

/ ./alnumbalance.sh http://stackexchange.com 
20 + 4 = 24
/। / আল্নাম্বলেন্স.শ "$ (বিড়াল অ্যালবাম্বলেন্স.শ)"
36 + 36 = 72
$ 

পূর্ববর্তী উত্তর:

খাঁটি বাশ, 92 (46 + 46) অ-সাদা অংশের অক্ষর cha

nosp=${1//[[:space:]]}
noaln=${nosp//[[:alnum:]]}
echo $[${#nosp}-${#noaln}] + ${#noaln} = ${#nosp}

আউটপুট:

/ ./alnumbalance.sh http://stackexchange.com 
20 + 4 = 24
/। / আল্নাম্বলেন্স.শ "$ (বিড়াল অ্যালবাম্বলেন্স.শ)"
46 + 46 = 92
$ 


নিয়ন্ত্রণের চরিত্রগুলি সম্পর্কে কী? [: alnum:] এর বিপরীতে নয় [: পাঙ্ক:]। উদাহরণস্বরূপ চেষ্টা করুন -c256 / dev / urandom | tr -d [: alnum:] [: punct:]
skibrianski

পছন্দ করুন আমি এটিকে আমলে নেওয়ার জন্য উত্তরটি সম্পাদনা করেছি।
ডিজিটাল ট্রমা

3

পাওয়ারশেল (43 + 43 = 86)

Golfed

function alf($i){$a=0;$n=0;[char[]]$i|%{if($_-match"[a-zA-Z0-9]"){$a++}else{$n++}}; write-host "$a+$n=$($a+$n)"}

আন golfed

function alf($i){
    $a=0;$n=0;  
    [char[]] $i | %{ if ($_ -match "[a-zA-Z0-9]") { $a++ } else { $n++ } };
    write-host "$a+$n=$($a + $n)"
}

পরীক্ষা

PS > alf "http://stackexchange.com"
20+4=24

মানদণ্ডটি পাস করার জন্য কোডের সাথে নিজেই পরীক্ষা করা

PS > alf "function alf($i){$a=0;$n=0;[char[]]$i|%{if($_-match`"[a-zA-Z0-9]`"){$a++}else{$n++}}; write-host `"$a+$n=$($a+$n)`"}"
43+43=86

" দিয়ে পালিয়ে গেছে - যা স্ট্রিংয়ের অংশ নয়।



2

রুবি 38 + 38 = 76

এই প্রোগ্রামটি ইনপুটটিতে নতুন লাইনের গণনা করে।

puts"#{a=gets.scan(/[a-z0-9]/i).length}+#{b=$_.scan(/\W|_/).length}=#{a+b}"

চরিত্র গণনা প্রোগ্রাম নিজেই সম্পন্ন করেছেন: $ ruby alphabalance.rb alphabalance.rb:)


2

পাওয়ারশেল, 70 বাইট (= 35 + 35)

param($s)"$(($l=$s.Length)-($n=($s|sls '\W' -a).Matches.Count))+$n=$l"

পরীক্ষার স্ক্রিপ্ট:

$f = {
param($s)"$(($l=$s.Length)-($n=($s|sls '\W' -a).Matches.Count))+$n=$l"
}

&$f "http://stackexchange.com"
&$f $f.toString().Trim()

আউটপুট:

20+4=24
35+35=70

পাওয়ারশেল, 70 বাইট (= 35 + 35), বিকল্প

"$(($l="$args"|% Length)-($n=($args|sls '\W'-a).Matches.Count))+$n=$l"

2

পাইথন 2 (60 + 60 = 120)

একটি শক্ত, সম্ভবত উন্নতির জন্য জায়গা আছে। সত্যটি পছন্দ করে ফাংশনটি নিজেই তার নিজস্ব বর্ণানুক্রমিক ভারসাম্য বিস্তৃত করতে ব্যবহার করা যেতে পারে।

def f(s):
 i=j=0
 for c in s:
  t=ord(c)
  if (t!=2**5): 
   i+=1  
  if (48<=t<=57 or 65<=t<=90 or 97<=t<=122):
   j+=1 
 print `j`,'+',`i-j`,'=',i      

টেস্ট:

>>> f("http://stackexchange.com")
20 + 4 = 24

পাইথনের এটি কোন সংস্করণ?
গিগাফ্লপ

@ জিগাফ্লপ আমি এটি সম্পাদনা করেছি। প্রিন্ট স্টেটমেন্টটি পাইথন 2 কেবল যেমনটির ব্যাকটিক সিনট্যাক্স repr
mbomb007

1

সি ++, 146 (73 + 73) 178 (89 + 89) নন-হোয়াইটস্পেস অক্ষর #

মূল <algorithm>কোনও যুক্তিসঙ্গত কারণে অন্তর্ভুক্ত । উফ।

//create a test string
#include<string>
std::string a = "\?\?=include <cstdio>\
int x,y;\
int main()\?\?<\
    for(char c : a)\
            !isspace(c) ? (isalnum(c) ? y++ : x++) : 0;\
    printf(\"%d\?\?/t%c\?\?/t%d\?\?/t%c\?\?/t%d\?\?/n\",y,'+',x,'=',(x+y));\
\?\?>";

//Code itself starts here
??=include <cstdio>
int x,y;
int main()??<
    for(char c : a)
        !isspace(c) ? (isalnum(c) ? y++ : x++) : 0;
    printf("%d??/t%c??/t%d??/t%c??/t%d??/n",y,'+',x,'=',(x+y));
??>

আমি পরে লাইনগুলিতে কেবল অক্ষর গণনা করছি //Code itself starts here। বিশেষত, এর অর্থ গণনা করা নয় #include <string>। আমি তিনটি চরিত্র হিসাবে ট্রিগ্রাফও গণনা করছি, যা সম্ভবত বিতর্কযোগ্য। নোট করুন যে প্রোগ্রামটি তার নিজস্ব সোর্স কোডে টেস্টিংয়ের ক্ষেত্রে স্ট্রিং আক্ষরিকের মধ্যে ট্রিগ্রফ প্রতিস্থাপন রোধ করার জন্য কিছু যত্নের প্রয়োজন।

এখানে কিছু অদ্ভুত নকশার সিদ্ধান্ত রয়েছে - বেশিরভাগ প্রোডাকশন কোডে আপনি একই ক্রিয়ায় ট্রাইগ্রাফ এবং পরিসীমা ভিত্তিক লুপগুলির মুখোমুখি হবেন না - তবে আমি মনে করি সমস্ত 'ন্যায়সঙ্গত' এর সীমার মধ্যে রয়েছে।


1

অজগর 52 +52 = 104

আকর্ষণীয় চ্যালঞ্জ কারণ পাইথন অ-অক্ষরীয় অক্ষরগুলি এড়িয়ে চলে।

def f(_):
    _=_.replace(" ","");l=len(_);a=sum([c.isalnum() for c in _][:l]);print("{0} + {1} = {2}".format(a,l-a,l))

স্লাইস ব্যবহারের জন্য গৌণ যুক্তিসঙ্গততা: এটি এটিকে গতি দেয় (সম্ভবত?)


পাইথন 2 ব্যবহার করার চেষ্টা করুন, যেহেতু প্রথম printবন্ধনী প্রয়োজন হয় না এবং '%d + %d = %d' % (a,l-a,l)পদ্ধতিটি ব্যবহার করে । এটি কিছু অক্ষর সংরক্ষণ করা উচিত।
mbomb007

1

জুলিয়া, 64

f(s)=(b=endof(s);a=sum([isalnum(c) for c in s]);"$(a) + $(b-a) = $(b)";)

সমস্ত অপ্রয়োজনীয় অ-অক্ষরীয় অক্ষরগুলি সর্বশেষ ;এবং ()স্ট্রিং ফর্ম্যাটিংয়ের কয়েকটি ।

julia> f("http://stackexchange.com")
"20 + 4 = 24"
julia> nowhite(s)=join(split("s"," "))
julia> f(nowhite("f(s)=(b=endof(s);a=sum([isalnum(c) for c in s]);\"\$(a)+\$(b-a)=\$(b)\";)"))
"32 + 32 = 64"

1

পার্ল, non৪ অ-সাদা অংশের অক্ষর:

$/=$,;
$_=<>;
s 0\s00g;
$\=length;
print s 1[a-z0-9]11ig .
      " + " .
      s 2.22g .
      " = "

পার্ল-এমও = ডিপার্স এবং কিছু মন্তব্যের মাধ্যমে কিছুটা স্পষ্ট করা হয়েছে:

$/ = $,;               # input record separator = a variable defaulting to undef
$_ = <ARGV>;           # slurp stdin
s/\s//g;               # strip whitespace
$\ = length $_;        # output record separator = total length of string sans whitespace
print s/[a-z0-9]//gi . ' + ' . s/.//g . ' = '; # count alphanumerics, then everything else

ওআরএস, $ \ মুদ্রণের জন্য প্রতিটি কলে স্বয়ংক্রিয়ভাবে সংযোজন করা হয়, মোট গণনা শেষে।


আমার প্রথম পাসে 66 টি চরিত্র ছিল। হেইকো ওবারডিককে দেখানোর জন্য আপনাকে ধন্যবাদ যে আপনি un / আনসেটটি কম অক্ষর দিয়ে সেট করে $, =) সেট করতে পারেন
স্কিবিরিয়ানস্কি

1

পাইথন 2, 50 + 50 = 100

import re
def f(i):
    w = re.sub('\s', '', i)
    s = re.subn('[\W_]', '', w)
    a = len(s[0])
    print '%d + %d = %d' % (a, s[1], a+s[1])

এটি এখানে চালান: http://repl.it/8CH


0

রিবোল (64 + 64 = 128)

f: func [x] [
    c: :charset
    a: c [#"a" - #"z"]
    s: c [#" " #"^/" #"^-"]
    n: complement union a s
    a+: n+: 0
    parse x [
        some [
            a (++ a+) |
            n (++ n+) |
            s
        ]
    ]
    print [a+ "+" n+ "=" a+ + n+]
]

ব্যবহারের উদাহরণ (রেবোল কনসোলে):

>> f "http://stackexchange.com"
20 + 4 = 24

বিশেষ দ্রষ্টব্য। প্রোগ্রাম গণনা থেকে স্পেস, ট্যাব এবং নতুন লাইন উপেক্ষা করে।


0

জে - 46 + 46 = 92

হোয়াইটস্পেস গণনা করে, তাই আপনি কোনও পরিবর্তন ছাড়াই স্ব-পরীক্ষা করতে পারবেন না। স্টিডিনে ইনপুট নেয়। খারাপ মুখ আছে, এটি সাবান দিয়ে ধুয়ে ফেলা উচিত।

;":&.>(+/;' + ';(#-+/);' = ';#)(e.~1!:1@1:)(,toupper)'golfscriptSUCKSabdehjkmnquvwxyz',,":"0 i.10

ব্যবহার:

   ;":&.>(+/;' + ';(#-+/);' = ';#)(e.~1!:1@1:)(,toupper)'golfscriptSUCKSabdehjkmnquvwxyz',,":"0 i.10
http://stackexchange.com
20 + 4 = 24

   NB. modification for self-test:    vvvvvv - remove spaces, the only whitespace
   ;":&.>(+/;' + ';(#-+/);' = ';#)(e.~' '-.~1!:1@1:)(,toupper)'golfscriptSUCKSabdehjkmnquvwxyz',,":"0 i.10
;":&.>(+/;' + ';(#-+/);' = ';#)(e.~1!:1@1:)(,toupper)'golfscriptSUCKSabdehjkmnquvwxyz',,":"0 i.10
46 + 46 = 92

0

জাভাস্ক্রিপ্ট - 76 (38 + 38)

_ = prompt()
o = _.match(/[a-z0-9]/gi).length
$ = _.length - o
alert(o + " + " + $ + " = " + (o + $))

নমুনা ইনপুট: http://stackexchange.com
আউটপুট:20 + 4 = 24

নিজের উপর চালানো:

var a  = '_ = prompt()o = _.match(/[a-z0-9]/gi).length$ = _.length - oalert(o + " + " + $ + " = " + (o + $))'

var letters = a.match(/[a-z0-9]/g).length; 
var nons = a.match(/[^a-z0-9 ]/g).length; // excludes whitespace from count

console.log(nons + " = " + letters); // 38 = 38 :)

পিএস (o + $)আলফানিউমেরিক ভারসাম্য বজায় রাখার জন্য সংশ্লিষ্টদের জন্য , এটি এমনটি নয়। কারণ o + " + "জেএস দেখার পরে +সংখ্যার সংযোজনকারীদের চেয়ে স্ট্রিং কনক্যাটেনটার হওয়ার সিদ্ধান্ত নেবে । সুতরাং প্রথম বন্ধনী প্রয়োজনীয়, বা পরিবর্তে 20 + 4হয়ে উঠবে : ডি20424

শুভ কোডিং!


0

বন্ধ

(def ff #(let [c count y (c %) x (c (re-seq #"\w" %))] (str x " + " (- y x) " = " y)))

আউটপুট:

alphabalance.core=> (ff "http://stackexchange.com")
"20 + 4 = 24"

0

সিজেএম, 27 + 27 = 54

সিজেএম এই চ্যালেঞ্জের চেয়ে কয়েক মাস নতুন, সুতরাং এই উত্তরটি সবুজ চেকমার্কের জন্য উপযুক্ত নয়। এটি যাইহোক, একটি মজার অনুশীলন ছিল!

ea0=eu{A,s'[,65>+#)g}%_:+1@f-:+ea0=,]"DODDaD"36f-3/]zo

এটি একটি কমান্ড-লাইন আর্গুমেন্ট হিসাবে ইনপুট স্ট্রিং নেয়, সুতরাং এটি অনলাইন দোভাষীটিতে কাজ করবে না, তবে আপনি এটি জাভা দোভাষী দ্বারা পরীক্ষা করতে পারেন

ব্যাখ্যা

"Distinguish alphanumeric characters:";
ea0=eu{A,s'[,65>+#)g}%
ea0=                   "Get the first command-line argument.";
    eu                 "Convert it to upper case.";
      {             }% "Map this block onto each character.";
       A,s             "Get the string '0123456789'.";
          '[,          "Get a string with all characters from the null byte to Z.";
             65>       "Remove the first 65 characters, to leave A to Z.";
                +      "Add to digit.";
                 #     "Find character in that string. Returns -1 if not alphanumeric.":
                  )g   "Increment and get signum. Yields 1 for alphanumeric characters,
                        0 otherwise.";

"Now we've got an array of 0s and 1s. Let's do the counting:";
_:+1@f-:+ea0=,]
_               "Duplicate array.";
 :+             "Get the sum. This is the number of alphanumeric characters.";
   1@           "Push a 1 and pull up the other copy of the array.";
     f-         "Subtract each element from 1, this swaps 0s and 1s.";
       :+       "Get the sum. This is the number of symbol characters.";
         ea0=   "Get the first command-line argument again.";
             ,  "Get its length. This is the total number of characters.";
              ] "Collect everything in an array.";

"And now the formatting:";
"DODDaD"36f-3/]zo
"DODDaD"          "Push this string.";
        36f-      "Subtract 36 from each character. This yields ' +  = '.";
            3/    "Split into two halves of 3 characters each.";
              ]   "Wrap this and the previous array in another array.";
               z  "Zip. Transposes the array to interleave strings with numbers.";
                o "Output the resulting array without delimiters.";
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.