23

এটি এনসিপিসি 2005 এর একটি সমস্যা । রায়ের একটি অ্যাপার্টমেন্ট কেবল একটি একক বৈদ্যুতিক আউটলেট রয়েছে, তবে তার কাছে একগুচ্ছ পাওয়ার স্ট্রিপ রয়েছে। তার কাছে থাকা পাওয়ার স্ট্রিপগুলি ব্যবহার করে তার সর্বোচ্চ সংখ্যক আউটলেট গণনা করুন। পাওয়ার স্ট্রিপ প্রতি আউটলেটগুলির সংখ্যা ইনপুট হিসাবে দেওয়া হয়।

দেখা যাচ্ছে যে যদি স্ট্রিপগুলির আউটলেটগুলির সংখ্যা যথাক্রমে হয়

{পি}_{1}, {পি}_{2}, ..., {পি}_{এন}

$p_1, p_2, \dots, p_n$

তারপরে আউটলেটগুলির সংখ্যা ,

1 - এন + + \underset{আমি}{Σ} {পি}_{আমি}

$1 - n + \sum_i p_i$

অথবা

1 + + {পি}_{1} - 1 + + {পি}_{2} - 1 + + \dots + + {পি}_{এন} - 1

$1 + p_1-1 + p_2-1 + \dots + p_n-1$ ।

প্রোগ্রাম বা ফাংশনে ইনপুট হ'ল ধনাত্মক পূর্ণসংখ্যার শূন্য সিরিজ।

উদাহরণ

2 3 4
> 7
2 4 6
> 10
1 1 1 1 1 1 1 1
> 1
100 1000 10000
> 11098

code-golf number arithmetic

— পল জিডি
সূত্র

17

এবং আমি ভেবেছিলাম আপনার পাওয়ার স্ট্রিপগুলি চেইন করার কথা ছিল না ...

— জো

যতদূর আমি আমার রেটিনা উত্তরটি বলতে পারি কেবল অ্যানারি ইনপুট ব্যবহার করা উত্তর। আপনি সেখানে মন্তব্য আলোচনার দিকে নজর রাখতে চাইবেন : কোডগলফ.স্ট্যাকেক্সচেঞ্জ / সেকশনস / 10১০47lect / ইলেক্ট্রিকাল- আউটলেট / ... ... যদি আপনি ভাবেন যে অ্যানারি সমাধানটি হ্যাকের অনেক বেশি যা আত্মার মধ্যে নেই চ্যালেঞ্জ, ইনপুট দশমিক হওয়া উচিত তা নির্দিষ্ট করে দেওয়ার জন্য আমি খুশি (এবং তারপরে আমার উত্তরটি ঠিক করে দেবে)।

— মার্টিন ইন্ডার

7

বিদ্যুৎ এত ব্যয়বহুল হওয়ায় আরও বেশি শক্তি ব্যবহার এড়াতে আপনার কোডটি যতটা সম্ভব সংক্ষিপ্ত হওয়া উচিত

— বিড়াল

1

পুরানো হ্যামস্টার চালিত টুরিং মেশিন এবং যান্ত্রিক কম্পিউটারগুলি খুঁজে বের করার জন্য @ কেট সময়

— ফারাপ

1

@ মিম্বিস নিশ্চিত, তবে আউটপুটটিকে বাইট স্ট্রমে থাকা তথ্য হিসাবে বিবেচনা করা হবে যা আপনার টার্মিনাল দ্বারা রেন্ডার করে কী ঘটে তা নয়।

— মার্টিন এন্ডার

24

জেলি, 3 বাইট

’S‘

হ্রাস (সমস্ত), যোগফল, বৃদ্ধি। এখানে চেষ্টা করুন।

— লিন
সূত্র

29

রেটিনা , 3 বাইট

পেছনের লাইনফিডটি তাৎপর্যপূর্ণ।

ইনপুটটি অবিচ্ছিন্ন সংখ্যার একটি স্থান-বিভাজিত তালিকা ।

এটি অনলাইন চেষ্টা করুন!

ব্যাখ্যা

কোডটি 1স্ট্রিং থেকে সমস্ত স্থান পাশাপাশি তাদের পরে সরিয়ে দেয় । এটি কেন কাজ করে তা এখানে:

আনরিতে যুক্ত হওয়া সহজ: কেবলমাত্র সংখ্যার সাথে যুক্ত করে যা ডিলিমিটারগুলি অপসারণের সমান। 1 দ্বারা হ্রাসও সহজ: 1প্রতিটি সংখ্যা থেকে কেবল একটি সরিয়ে দিন । যদিও আমরা হ্রাসপ্রাপ্ত ইনপুটগুলির যোগফলের চেয়ে 1 টি বেশি চাই, তাই আমরা কেবল 1স্থানগুলির পরে কেবলমাত্র সারণিগুলি সরিয়ে ফেলব, যার ফলে প্রথম ইনপুট ব্যতীত সমস্ত হ্রাস পাবে।

— মার্টিন ইন্ডার
সূত্র

1

আমি ভাবছি আনারি ইনপুট অনুমতি দেওয়া উচিত কিনা।

— জন ডিভোরাক

@ জনডভোরাক এটি ডিফল্টরূপে, যদি না চ্যালেঞ্জটি স্পষ্টভাবে দশমিক ইনপুট নির্দিষ্ট করে দেয়। (উত্তরের লিঙ্কটি দেখুন)) যদিও জেলি যাই হোক জিতছে তাতে কিছু আসে যায় না।

— মার্টিন ইন্ডার

@ মার্টিনব্যাটনার এই প্রশ্ন এবং মূল অ্যাসাইনমেন্ট উভয়ই স্যাম্পল ডেটা আছে। আপনি কি মনে করেন না (যদি না অন্যথায় বলা হয়) যে পাস করার জন্য এটি প্রয়োজনীয় (যথেষ্ট না হলেও) মানদণ্ড হওয়া উচিত, কোডটি ভারব্যাটিমের নমুনা ডেটার সাথে কাজ করে?

— nitro2k01

1

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

— মার্টিন ইন্ডার

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

— nitro2k01

9

হেক্সাগনি , 18 14 বাইট

.?<_(@'")>{+.!

দুচোখে:

  . ? <
 _ ( @ '
" ) > { +
 . ! . .
  . . .

এটি অনলাইন চেষ্টা করুন!

আমি মনে করি না পার্শ্ব দৈর্ঘ্যের 2 সম্ভব, কিন্তু ~~উচিত নয়~~ আরও কার্যকর পার্শ্ব-দৈর্ঘ্য 3 সমাধান এই যে হতে পারে।

এটি হ'ল সাধারণ "হ্রাস হ্রাস, যোগফল, বৃদ্ধি" পদ্ধতি, তবে হেক্সাগনীতে এটি ঠিক কীভাবে কাজ করে তা দেখানোর জন্য আমাকে পরে চিত্রগুলি যুক্ত করতে হবে।

— মার্টিন ইন্ডার
সূত্র

7

পাইথন, 24 বাইট

lambda*n:1-len(n)+sum(n)

এটি অনলাইনে চেষ্টা করুন

— ঐ মেগো
সূত্র

1

এটি ধরে নেয় যে ফাংশনটি প্রথমে নির্ধারিত হয়, তারপরে অন্যান্য ভেরিয়েবলের ইনপুটটিতে প্রয়োগ করা হয়।

— জুয়ানডেস্যান্ট

1

@ জেন্ডেসেন্ট ... যা পুরোপুরি ঠিক আছে। এটি একটি ফাংশন আক্ষরিক, যা জমা দেওয়ার বৈধ রূপ।

— ফ্লিপট্যাক

7

গণিত, 9 বাইট

Tr[#-1]+1&

— একটি সিমন্স
সূত্র

7

হাস্কেল, 17 15 বাইট

foldl1$(+).pred

ব্যবহারের উদাহরণ: ( foldl1$(+).pred ) [2,4,6]-> 10।

পুরানো সংস্করণ, বিভিন্ন পদ্ধতির, 17 বাইট: succ.sum.map pred।

— nimi
সূত্র

6

জে, 6 বাইট

+/+1-#

যোগফল এক বিয়োগের দৈর্ঘ্য। এটিকে পছন্দসই করুন এবং প্রয়োগ করুন:

   (+/+1-#) 2 3 4
7

— লিন
সূত্র

6

ভোল্টেজ , 9 বাইট

"?;)!@
+(

এটি অনলাইন চেষ্টা করুন!

সাধারণ প্রাইমার:

ভোল্টেজটি 2 ডি এবং স্ট্যাক-ভিত্তিক। স্ট্যাকের নীচে অসংখ্য শূন্য রয়েছে।
যখন নির্দেশ পয়েন্টারটি কোনও মোড়কে পৌঁছে যায়, তখন এটি কোথায় স্ট্রাক্ট করতে হবে তা নির্ধারণের জন্য স্ট্যাকের শীর্ষটি পরীক্ষা করে। নেতিবাচক বাম, শূন্য এগিয়ে এবং ধনাত্মক ডান।

এখানে আমরা উপরের বাম দিকে শুরু করব ", একটি নো-অপোস, ডানদিকে শিরোনাম। এরপরে ?, যা এসটিডিএন থেকে একটি ইনট পড়বে (অক্ষর ছুঁড়ে ফেলে এটি কোনও পূর্ণসংখ্যার উদাহরণ হিসাবে ফাঁকা স্থানগুলি পার্স করতে পারে না)। এখন আমাদের দুটি মামলা রয়েছে:

যদি ইনপুটটি ইতিবাচক হয় তবে আমরা পারফর্ম করে ডানদিকে ঘুরলাম:

(            decrement top of stack
+            add top two stack elements
             [continue loop]

যদি ইনপুটটি শূন্য হয় (যা EOF এ ঘটে), আমরা সরাসরি সম্পাদন করে এগিয়ে যাব:

;            pop zero from EOF
)            increment top of stack
!            output top of stack as number
@            halt program

— Sp3000
সূত্র

5

পাইথ, 5 বাইট

hstMQ

বৃদ্ধি (যোগফল (মানচিত্র (হ্রাস, ইনপুট))

— লিন
সূত্র

5

ES6, 25 বাইট

a=>a.map(n=>r+=n-1,r=1)|r

— নিল
সূত্র

4

আমি পোস্ট করতে যাচ্ছিলাম: "হ্রাস যখন গেম জিতবে তখন বিরল ক্ষেত্রে একটি" ... এবং এটি 25 টিও l=>l.reduce((a,b)=>a+b-1)।

— edc65

@ edc65 হ্যাঁ, এটি (,b)ব্যয়বহুল, তবে আমি এটির সংস্করণটিও পছন্দ করি।

— নিল

5

এমএটিএল, 3 বাইট

qsQ

এটি অনলাইনে চেষ্টা করুন।

ব্যাখ্যা

qsQ
q      thread decrement over the input array
  s    sum
   Q   increment

— একটি স্প্যাগেটো
সূত্র

4

05 এ বি 1 ই , 4 বাইট

কোড:

E<O>

ব্যাখ্যা:

E     # Evaluates input
 <    # Decrement on list
  O   # Compute the total sum
   >  # Increment on the sum
      # Implicit: output top of the stack

অ্যারের মতো ইনপুট নেয় (যেমন [3, 4, 5])।

— আদনান
সূত্র

গল্ফিং

— ল্যাংয়ের

4

স্টারি , 26 24 বাইট

, + '`      + ** `, +'*.

নিউলাইন-বিভাজিত পূর্ণসংখ্যার প্রত্যাশা করে। এটি অনলাইন চেষ্টা করুন!

-২ বাইটের জন্য @ মার্টিনব্যাটনারকে ধন্যবাদ।

,           Read line as integer
 + '        Dupe and jump to label 1 if nonzero
`           Set label 0
      +     Push 1
 *          Sub
*           Add
 `          Set label 1
,           Read line as integer
 + '        Dupe and jump to label 0 if nonzero
*           Add
.           Output as integer

লুপটি অনিবন্ধিত হয়েছে যাতে প্রথম সংখ্যাটি হ্রাস না হয়, বৃদ্ধির প্রয়োজনকে অগ্রাহ্য করে। স্টারিতে সংখ্যা ধাক্কা ব্যয়বহুল ...

— Sp3000
সূত্র

আমি কেবল 20 বাইট গণনা করি।

— অ্যাডিসন ক্রম্প 21

1

@ ভোটটোক্লোজ আপনি কি শীর্ষস্থানীয় স্থানগুলি গণনা করেছেন? (আমি ধরে নিচ্ছি আপনি 26 বাইটের কথা বলছেন)

— Sp3000

4

বাশ + জিএনইউ ইউটিলিটিস, 16

যদি Nপাওয়ার স্ট্রিপগুলি থাকে তবে N-1কমা-বিচ্ছিন্ন ইনপুট তালিকার মধ্যে পৃথককারী থাকতে হবে । আমাদের যা করার দরকার তা হ'ল বিভাজনগুলি প্রতিস্থাপন করা - 1 +এবং গাণিতিকভাবে মূল্যায়ন:

sed s/,/-1+/g|bc

বা একই কৌশল ব্যবহার করে:

খাঁটি বাশ (কোনও বাহ্যিক উপযোগ নেই), ১৯

echo $[${1//,/-1+}]

— ডিজিটাল ট্রমা
সূত্র

3

এপিএল (এনআরএস 2000), 13 10 বাইট

{1+(+/⍵)-⍴∊⍵}

সম্পাদনা করুন: লিনের (আরও ভাল) পদ্ধতির সাথে নিচে 10

{1++/1-⍨⍵}

— Koneke
সূত্র

3

জিএস 2, 5 বাইট

(CP437 এনকোডেড।)

W&Φd'

এটাই read-nums dec m1 sum inc।

— লিন
সূত্র

3

সিজেম, 7 বাইট

q~:(:+)

এটি এখানে পরীক্ষা করুন।

লিন্সের হিসাবে একই পন্থা (হ্রাস সব, যোগফল, বৃদ্ধি)। এটি 8 বাইটের জন্যও কাজ করে (এবং এটি কিছুটা আকর্ষণীয়ও হতে পারে):

q~{(+}*

এই তালিকার উপর "হ্রাস, যোগ" ভাঁজ করে। এটি করে, হ্রাসটি কেবলমাত্র প্রথমটি ব্যতীত অন্য সমস্ত উপাদানের ক্ষেত্রে প্রয়োগ করা হয়, যেমন আমাদের আলাদাভাবে বর্ধনের যত্ন নেওয়ার প্রয়োজন নেই।

— মার্টিন ইন্ডার
সূত্র

3

সি, 60 59 55 বাইট

x;main(s){while(~scanf("%i",&x))s+=x-1;printf("%i",s);}

— stmbgr1
সূত্র

3

পার্ল 6, 14 বাইট

{1+[+] --«@_}

ব্যবহার

my &f = {1+[+] --«@_}

say f([2,3,4]) # 7
say f([2,4,6]) # 10
say f([1,1,1,1,1,1,1,1]) # 1
say f([100,1000,10000]) # 11098

— হট
সূত্র

আমি সম্পূর্ণ একই

— জিনিসটিতে

11 বাইট:{.sum-$_+1}

— nwellnhof

3

সিরিয়াসলি, 7 বাইট

,;l@Σ-u

এটি অনলাইন চেষ্টা করুন!

ব্যাখ্যা:

,;l@Σ-u
,        push input
 ;       dupe
  l@     push length (n), swap
    Σ-u  push sum, subtract n, add one

— ঐ মেগো
সূত্র

2

পার্ল 6 , 20 বাইট

put 1+sum --«@*ARGS

(আপনি এর <<পরিবর্তে ব্যবহার করতে পারেন «)

ব্যবহার:

$ perl6 -e 'put 1+sum --«@*ARGS' 100 1000 10000
11098

— ব্র্যাড গিলবার্ট বি 2 গিলস
সূত্র

Per পার্ল অপারেটর কি?

— ব্যবহারকারী 253751

@ ইমিবিস আসলে এটি বেশ কয়েকটি পার্ল 6 অপারেটরের অংশ @arraya »+« @arrayb ++«@array @array».method @array»++ « a 'space separated' list of words » হ'ল মেটা অপারেটর হিসাবে পরিচিত যা তারা অন্যান্য অপারেটরের সাথে একত্রিত করে। (পার্ল 5 ঐ অপারেটার বর্তমানে নেই।)

— ব্র্যাড গিলবার্ট b2gills

2

পার্ল 5 23 + 2 = 25 বা 19 + 2 = 21

-apপতাকা প্রয়োজন :

map{$.+=($_-1)}@F;$_=$.

একটি ফাইলে সংরক্ষণ এবং হিসাবে চালানো

perl -ap file.pl

সম্পাদনা: অন্য একটি উত্তর, ছোট (19 + 2) তবে মূলত দেব-নাল উত্তর থেকে অনুলিপি করা হয়েছে:

$.+=$_-1for@F;$_=$.

— ChatterOne
সূত্র

2

এফ #, 25 বাইট

Seq.fold(fun s n->s+n-1)1

এটি এমন একটি ফাংশন যা পূর্ণসংখ্যার অ্যারে / তালিকা / ক্রম নেয় এবং প্রয়োজনীয় ফলাফল প্রদান করে।

কিভাবে এটা কাজ করে:

Seq.foldকিছু কিছু অবস্থা চালিয়ে যাওয়ার সময় আপনাকে ক্রমের প্রতিটি উপাদানগুলিতে কোনও ক্রিয়াকলাপ প্রয়োগ করতে দেয়। প্রথম উপাদান হিসাবে প্রয়োগ হিসাবে ফাংশন ফলাফল দ্বিতীয় উপাদান জন্য ফাংশন মধ্যে করা হবে যে রাষ্ট্র প্রদান করবে, এবং আরও। উদাহরণস্বরূপ, তালিকাটি যোগ করতে[1; 3; 4; 10] , আপনি এটি এটি লিখতে চাই:

Seq.fold (fun sum element -> sum + element) 0 [1; 3; 4; 10]
         (       function to apply        ) ^ (sequence to process)
                                     ( initial state )

যা এর মতো প্রয়োগ করা হবে:

// First, initial state  + first element
0 + 1  = 1
// Then, previous state + next element until the end of the sequence
1 + 3  = 4
4 + 4  = 8
8 + 10 = 18

সর্বশেষ রাজ্যের সাথে ফেরতের মান হচ্ছে Seq.fold।

— Roujo
সূত্র

2

𝔼𝕊𝕄𝕚𝕟, 5 টি চর / 7 বাইট

ï⒭+‡_

Try it here (Firefox only).

10-বিট চরগুলি (thx @ ডেনিস!) সহ একটি কাস্টম এনকোডিং ব্যবহার করে। encode('ï⒭+‡_')এনকোডযুক্ত ফর্মটি পেতে এবং decode(/*ENCODED TEXT HERE*/)এনকোডযুক্ত ফর্মটি ডিকোড করতে জেএস কনসোলে চালান ।

ব্যাখ্যা

জাভাস্ক্রিপ্ট ES6 এ অনুবাদ করে:

i=>i.reduce(($,_)=>$+--_)

— মামা ফান রোল
সূত্র

আকর্ষণীয় এনকোডিং।

— lirtosiast

এটিও বেশ সুন্দরভাবে কাজ করে।

— মামা ফান রোল

2

মর্নিংটন ক্রিসেন্ট , 1909 1873 1839 বাইট

Take Northern Line to Stockwell
Take Victoria Line to Seven Sisters
Take Victoria Line to Victoria
Take Circle Line to Victoria
Take Circle Line to Bank
Take Circle Line to Hammersmith
Take Circle Line to Cannon Street
Take Circle Line to Hammersmith
Take Circle Line to Cannon Street
Take Circle Line to Bank
Take Circle Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Becontree
Take District Line to Upminster
Take District Line to Becontree
Take District Line to Upminster
Take District Line to Becontree
Take District Line to Turnham Green
Take District Line to Hammersmith
Take District Line to Turnham Green
Take District Line to Notting Hill Gate
Take Circle Line to Notting Hill Gate
Take Circle Line to Bank
Take Circle Line to Embankment
Take Northern Line to Stockwell
Take Northern Line to Embankment
Take Circle Line to Temple
Take Circle Line to Hammersmith
Take District Line to Upminster
Take District Line to Becontree
Take District Line to Upminster
Take District Line to Becontree
Take District Line to Upminster
Take District Line to Becontree
Take District Line to Blackfriars
Take Circle Line to Embankment
Take District Line to Parsons Green
Take District Line to Bank
Take Circle Line to Hammersmith
Take District Line to Upminster
Take District Line to Becontree
Take District Line to Upminster
Take District Line to Becontree
Take District Line to Upminster
Take District Line to Becontree
Take District Line to Parsons Green
Take District Line to Embankment
Take Circle Line to Blackfriars
Take Circle Line to Bank
Take Northern Line to Angel
Take Northern Line to Bank
Take Circle Line to Bank
Take District Line to Upminster
Take District Line to Bank
Take Circle Line to Bank
Take Northern Line to Mornington Crescent

এটি অনলাইন চেষ্টা করুন!

— pppery
সূত্র

"সমস্ত নির্দেশাবলীর 90% জেলায় জেলা রেখা নেওয়া জড়িত।" এটি কারণ জেলা যেখানে সমস্ত পাটিগণিত স্টেশন। তবে, টিআইও-তে এটি কোনও উদাহরণের জন্য কার্যকর বলে মনে হচ্ছে না ।

— নিডজেজেকোব

1873 বাইট যেখানে সম্ভব সংক্ষিপ্ত রেখার নাম ব্যবহার করে

— নিডজেজেকোব

টিআইওর দোভাষীর একটি ত্রুটি রয়েছে এবং

— টার্নহ্যাম

আমার স্নাতকের. আমি একটি জনসংযোগ প্রেরণ করেছি যা এটিকে প্রবাহিত করে।

— নিডজেজেকোব

1

পাইথন 3, 79 বাইট

import sys
print(sum(map(lambda x: int(x)-1, sys.stdin.readline().split()))+1)

— পল জিডি
সূত্র

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

— ড্যাফি

1

রুবি, 30 বাইট

$*.inject(1){|s,v|s+=v.to_i-1}

যথেষ্ট সহজ - 1 থেকে শুরু করে সরবরাহিত সংখ্যাগুলি যোগ করুন, প্রতিটি -1 (কমান্ড লাইনের আরোগুলি রয়েছে $*) লজ্জা injectএত দীর্ঘ শব্দ word

— Chowlett
সূত্র

1

পাওয়ারশেল, 19 বাইট

$args-join'-1+'|iex

1 + p1-1 + p2-1 + ... + pn-1সমান যে নোটp1-1 + p2-1 + ... + pn ।

এর সাথে পৃথক কমান্ড-লাইন আর্গুমেন্ট হিসাবে ইনপুট নেয় $args। আমরা -joinযারা -1+ডিলিমিটারের সাথে একসাথে স্ট্রিং তৈরি করি, যেমন 2-1+3-1+4। স্ট্রিংটি এরপরে পাইপ করা হয় Invoke-Expression(অনুরূপ eval) এবং ফলাফল আউটপুট করে।

— AdmBorkBork
সূত্র

1

পার্ল, 21 + 2 = 23 বাইট

$a+=$_-1for@F;say++$a

প্রয়োজনীয় -aএবং -E:

$ perl -aE'$a+=$_-1for@F;say++$a'<<<'2 3 4'
7

— andlrc
সূত্র

আপনি ইতিমধ্যে বিভক্ত উপাদানগুলির সাথে ভেরিয়েবল -aপেতে পতাকাটি ব্যবহার করতে পারেন @Fএবং -p এর সাথে প্রতিস্থাপন করতে পারেন যাতে আপনি sayএটি 21 + 2 এ হ্রাস না করে:$a+=$_-1for@F;$_=++$a

— চ্যাটারঅন

-pপরিবর্তে ব্যবহার করা sayএকই কারণ আমার $_=যেভাবেই ব্যবহার করা দরকার ।

— andlrc

@ চ্যাটারওনে -aএকটি ভাল ধারণা!

— andlrc

1

ব্রেইনফাক, 15 বাইট

অনুমান: সমস্ত ইনপুট শেষ হয়ে গেলে, অপারেটর 0 প্রদান করে এবং 0 প্লাগ সহ কোনও এক্সটেনশন কর্ড নেই। এছাড়াও, আইওকে ASCII অক্ষর কোডগুলির পরিবর্তে বাইট মানগুলিতে থাকা দরকার।

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

ব্যাখ্যা: এটিতে 2 টি রেজিস্টার ব্যবহার করা হয়। একটি "মান" সংগ্রহকারী রেজিস্টার, যেগুলি প্লাগ ইন করা যেতে পারে এমন সংখ্যক ডিভাইসের প্রতিনিধিত্ব করে এবং একটি "বর্তমান কর্ড" নিবন্ধ যা বর্তমান কর্ডের মান ট্র্যাক করে। এটি বিদ্যমান আউটলেটটির মান 1 দ্বারা বাড়িয়ে শুরু করে। তারপরে, প্রতিটি এক্সটেনশান কর্ডের জন্য, এটি একটি প্লাগ গ্রহণের পরে মান থেকে একটিকে বিয়োগ করে, তারপরে প্লাগের সংখ্যা অনুসারে মান বাড়িয়ে তোলে।

বেশিরভাগ অনলাইন অনুবাদক কাঁচা বাইট ইনপুট মোডে কাজ করেন না। এটি অনলাইনে পরীক্ষা করতে, এই কোডটি ব্যবহার করুন:

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

— ইথান
সূত্র

আমি কি কোথাও প্রোগ্রামটি পরীক্ষা করতে পারি?

— পল জিডি

ধন্যবাদ, এই ভুলগুলি সংশোধন করেছেন। বাইট মোডে পরিচালিত কোনও অনলাইন দোভাষী সম্পর্কে আমি অবগত নই। আমি কোনও বাস্তবায়ন একসাথে ফেলতে পারি যা যে কোনও অনলাইন দোভাষীকে চালিত ইনপুট থেকে '0' বিয়োগ করে।

— ইথান

আপনি যদি কোডটি পরীক্ষা করে দেখতে চান তবে এটি এখানে চালান: copy.sh/brainfuck সংখ্যার মানগুলির মধ্যে ফাঁকা স্থান রাখবেন না। দুর্ভাগ্যক্রমে, যেহেতু এটি ASCII মোডে কাজ করছে, ডেমো কোডটি কেবলমাত্র একক অঙ্কের মানগুলিতে কাজ করবে। তবে, 15 বাইট সংস্করণটি একটি মান <= 255- তে সঠিকভাবে কাজ করবে you এটি চালানোর পরে, চূড়ান্ত মানটি দেখতে মেমরি ডাম্পটি দেখুন।

— এথান

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

— ফারাপ

বৈদ্যুতিক বিজ্ঞাপন

উদাহরণ

জেলি, 3 বাইট

রেটিনা , 3 বাইট

ব্যাখ্যা

হেক্সাগনি , 18 14 বাইট

পাইথন, 24 বাইট

গণিত, 9 বাইট

হাস্কেল, 17 15 বাইট

জে, 6 বাইট

ভোল্টেজ , 9 বাইট

পাইথ, 5 বাইট

ES6, 25 বাইট

এমএটিএল, 3 বাইট

ব্যাখ্যা

05 এ বি 1 ই , 4 বাইট

স্টারি , 26 24 বাইট

বাশ + জিএনইউ ইউটিলিটিস, 16

খাঁটি বাশ (কোনও বাহ্যিক উপযোগ নেই), ১৯

এপিএল (এনআরএস 2000), 13 10 বাইট

জিএস 2, 5 বাইট

সিজেম, 7 বাইট

সি, 60 59 55 বাইট

পার্ল 6, 14 বাইট

সিরিয়াসলি, 7 বাইট

পার্ল 6 , 20 বাইট

ব্যবহার:

পার্ল 5 23 + 2 = 25 বা 19 + 2 = 21

এফ #, 25 বাইট

কিভাবে এটা কাজ করে:

𝔼𝕊𝕄𝕚𝕟, 5 টি চর / 7 বাইট

ব্যাখ্যা

মর্নিংটন ক্রিসেন্ট , 1909 1873 1839 বাইট

পাইথন 3, 79 বাইট

রুবি, 30 বাইট

পাওয়ারশেল, 19 বাইট

পার্ল, 21 + 2 = 23 বাইট

ব্রেইনফাক, 15 বাইট