একটি ইনপুট স্ট্রিং এস দেওয়া, truthyএস এর মধ্যে সমস্ত অক্ষর লেক্সিকালি অর্ডার করা থাকলে ফিরে যান: তাদের ASCII মানগুলি হয় আরোহী বা অবতরণী ক্রমে থাকা দরকার। falsyঅন্যান্য ক্ষেত্রে ফিরে আসুন ।

ইনপুট

ইনপুট একই ক্ষেত্রে হবে (সমস্ত উচ্চ - বা সমস্ত ছোট হাতের)। আপনার জমাটি উভয়ই পরিচালনা করতে সক্ষম হওয়া উচিত।
ইনপুটটি [A-Za-z]কেবলমাত্র সীমার মধ্যে ASCII নিয়ে গঠিত
ইনপুট দৈর্ঘ্য কমপক্ষে 1 হবে, আপনার ভাষা যতটা সমর্থন করে।
ইনপুট একটি স্ট্রিং - অক্ষরের তালিকা নয়, এএসসিআইআই কোডপয়েন্টের অ্যারে নয়।

আউটপুট

আউটপুট হতে হবে trueবা false, বা 0/1, বা অন্য কোনও স্বতন্ত্র true / falseস্টাইল আউটপুট আপনার ভাষা সরবরাহ করতে পারে।
সমস্ত সত্য ক্ষেত্রে একই আউটপুট, পাশাপাশি সমস্ত মিথ্যা মামলা থাকা দরকার। কোনও "মিথ্যা 0 নয়, সত্য 1, 2, বা 3"।

অতিরিক্ত বিধি

স্ট্যান্ডার্ড লুফোলগুলি নিষিদ্ধ
উত্তরটি অবশ্যই একটি সম্পূর্ণ প্রোগ্রাম বা একটি ক্রিয়াকলাপ হতে হবে, কোনও স্নিপেট বা একটি REPL- এন্ট্রি নয়।
কোড-গল্ফ , বাইট জেতে সংক্ষিপ্ত উত্তর।

পরীক্ষার মামলা

Truthy

"ABCDEF"
"ZYX"
"no"
"tree"   --> the multiple 'e's don't break the order
"q"

Falsy

"ABCDC"
"yes"
"deed"

অকার্যকর

"Hello" --> invalid input - mixed case-, does not have to be handled
""      --> invalid input - length 0-, does not have to be handled
"\n
  "     --> invalid input - newline is not in range [A-Za-z]-, does not have to be handled

— steenbergh
সূত্র

1

আপনি কি আউটপুট সম্পর্কে স্পষ্ট করে বলতে পারেন: যা ইনপুট দেওয়া হয় তা নির্বিশেষে সত্যবাদী মানটি কি একই হওয়া দরকার?

— বিড়াল বিড়াল

1

@ বিজনেসগেট আমি একটি ব্যাখ্যা যোগ করেছি।

— স্টেইনবার্গ

যদি আপনার ভাষার স্ট্রিংয়ের প্রয়োগটি অক্ষরের একটি তালিকা হয়? এখানে পোস্ট করা বেশিরভাগ উত্তর এই জাতীয় ভাষা ব্যবহার করছে ...

— Theonlygusti

1

আপনি যদি সত্য এবং মিথ্যা জন্য স্বতন্ত্র মান চান তবে আপনার বলা truthyবা করা উচিত নয় falsy। এটি সূচিত করে যে কোনও মান যা মূল্যায়ন করে trueবা falseঅনুমোদিত হয়।

— ফ্লিপট্যাক

3

সম্পর্কিত: ওয়েভির শব্দগুলি সন্ধান করুন!

— তিতাস

8

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

Â)¤{å

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

ব্যাখ্যা

Â)     # pair the input with it's reverse in a list
  ¤{   # get a copy of the reverse and sort it
    å  # check if the sorted copy is in the list of [input,reverse_input]

— Emigna
সূত্র

{Â¹å4 এর জন্য, আমার উত্তর মোছা হয়েছে। দ্বিখণ্ডিত ব্যবহার লক্ষ্য করিনি, খনিটিও খুব অনুরূপ।

— ম্যাজিক অক্টোপাস উরান

@ কারাসোকম্পিউটিং: এটি দুর্ভাগ্যক্রমে কেবল পরীক্ষা করে দেখবে যে ইনপুটটি সাজানো ইনপুটটির বিপরীতে রয়েছে কিনা।

— এমিলিগনা

বা সাজানো ইনপুট সমান। aba => ['aab', 'baa'] => is in? => 0| aab => same => 1

— ম্যাজিক অক্টোপাস উরন

@ কারাসোকম্পুটিং: সাজানো ইনপুটটি স্ট্যাকের বিপরীতে নীচে হওয়ায় এড়ানো হবে। আপনি তাদের তালিকায় কখনও জুড়বেন না।

— এমিলিগনা

বিভাজক মোড়ানো আউটপুট কানা শপথ করা; এনভিএম, আমাকে উপেক্ষা করুন।

— যাদু অক্টোপাস উরান

17

পাইথন 2 , 53 44 40 39 বাইট

lambda a:`sorted(a)`[2::5]in(a,a[::-1])

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

— যষ্টি
সূত্র

দুর্দান্ত, তবে এটি অবৈধ মানগুলির

— প্যাট্রিক বার্ড

5

@ পেট্রিকবার্ড মিশ্রিত মামলাটি একটি অবৈধ ইনপুট, হ্যান্ডেল করতে হবে না

— রড

13

হাস্কেল , 33 বাইট

(%)=scanl1
f s=s==max%s||s==min%s

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

এলিয়জিং scanl1ইনফিক্স সহ 1 বাইটের জন্য Ørjan জোহানসেনকে ধন্যবাদ ।

হাস্কেল হ'ল গল্ফ বাছাই-ভিত্তিক চ্যালেঞ্জগুলির জন্য একটি আকর্ষণীয় ভাষা কারণ এটির মধ্যে দীর্ঘসূত্রে বাদ দিয়ে কোনও বিল্ট-ইন বাছাই নেই import Data.List। এটি স্পষ্টভাবে বাছাই ছাড়াই কাজ করে কোনও কাজ করার উপায় খুঁজে পেতে উত্সাহ দেয়।

কোডটি ব্যবহার করে scanl1, যা মধ্যবর্তী ফলাফলের উপর নজর রেখে তালিকার বাম থেকে ডানে অপারেশনকে ভাঁজ করে। সুতরাং, scanl1 maxতালিকার ক্রমবর্ধমান ম্যাক্সিমার তালিকা তৈরির প্রভাব রয়েছে, যেমন ক্রমান্বয়ে দীর্ঘতর উপসর্গের সর্বোচ্চ। উদাহরণস্বরূপ scanl1 max [3,1,2,5,4] == [3,3,3,5,5],।

minতালিকাটি হ্রাস হচ্ছে কিনা তা যাচাইয়ের সাথে একই । কোড দুটি কেস পরীক্ষা করে এবং তাদের সাথে একত্রিত করে ||।

অন্যান্য ভাবের সাথে তুলনা করুন:

(%)=scanl1;f s=s==max%s||s==min%s

f s=or[s==scanl1 q s|q<-[min,max]]
f s=s==scanl1 max s||s==scanl1 min s
f s=any(\q->scanl1 q s==s)[min,max]
f s=any((==s).(`scanl1`s))[min,max]
f s=elem s$(`scanl1`s)<$>[min,max]

— xnor
সূত্র

||আপনি সংজ্ঞা দিলে আসলে জয়ের সাথে আপনার সংস্করণ (?)=scanl1।

— janrjan জোহানসেন

11

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

{[le] .comb or[ge] .comb}

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

.comb অক্ষরগুলির ক্রমে ইনপুট বিভক্ত করে।
leএবং geহয় "কম বা সমান" এবং "বড় বা সমান" স্ট্রিং তুলনা অপারেটর।
[ ]ইনফিক্স অপারেটরের আশেপাশে, সেই অপারেটরের সাথে যুক্তির তালিকা ("ভাঁজ") হ্রাস করে reduces (ইনপুটটিতে কেবল শূন্য বা একটি অক্ষর থাকলে সত্যটি ফিরিয়ে দেওয়া যথেষ্ট স্মার্ট))
or যদি এর উভয় পক্ষের অভিব্যক্তিগুলি সত্য হয় তবে এটি সত্য করে।

— smls
সূত্র

10

জাভাস্ক্রিপ্ট (ES6), 43 বাইট

([...s],q=s+"")=>q==s.sort()|q==s.reverse()

— ETHproductions
সূত্র

আপনি যুক্তি নিজেই পরিবর্তনশীল পরিবর্তন করতে পারেন জানেন না। নিস!

— লুক 13

1

@ লুক এটিকে ডিফল্ট পরামিতিগুলির একটি কৌশল মাত্র : আপনি যদি দ্বিতীয় যুক্তির মাধ্যমে ফাংশনটি কল করতে চান qতবে পরিবর্তে সেই মানটিতে সেট করা হবে।

— ইটিএইচ প্রডাকশনগুলি 30:79

আমি আসলে স্প্রেড অপারেটরকে বোঝাতে চাইছিলাম যা (এই ক্ষেত্রে) এখনই এটিকে অ্যারেতে রূপান্তর করবে।

— লুক 20

ওহ ঠিক আছে. হ্যাঁ, ডেস্ট্রাকচারিং অ্যাসাইনমেন্টগুলিও সত্যই কার্যকর

— y-)

চতুর mutating ব্যবহার .sort()করতে পরোক্ষভাবে সাজানোর মধ্যে reverseচেক

— Cyoce

7

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

dZSuz2<

এটি অনলাইন চেষ্টা করুন! বা সমস্ত পরীক্ষার কেস যাচাই করুন ।

d     % Implicitly input string. Push array of consecutive differences of code points
ZS    % Sign. Transforms each entry into 1, 0 or -1
u     % Unique
z     % Number of nonzeros
2<    % Is it less than 2? Implicit display

— লুইস মেন্ডো
সূত্র

এটি সমস্ত অবৈধ মামলার ক্ষেত্রে

— প্যাট্রিক বার্ড

1

@ পেট্রিকবার্ড দিকনির্দেশগুলি যেমন বলেছে, তাদের কোনওটিই হ্যান্ডল করার দরকার নেই।

— সোয়েভার

6

ক্লোজার, 47 বাইট

#(let[c(map int %)a apply](or(a <= c)(a >= c)))

— NikoNyrh
সূত্র

কোন অপারেটরকে সংক্ষিপ্তভাবে প্রয়োগ করবেন তা কীভাবে সিদ্ধান্ত নেবেন তা নির্ধারণ করতে পারিনি। এটা অসাধারণ.

— কারসিজিনিট

আপনি কি অন্তর্নির্মিত ফাংশন নামগুলি ক্লোজুরেতে ভেরিয়েবলগুলিতে রাখতে পারেন অপেক্ষা করুন? হুঁ, এটা দুর্দান্ত। এটি যদিও তৈরি করে <=এবং >=ইনফিক্স দেখায় যা সত্যই অদ্ভুত।

— ক্লিমেমিক

(let[+ *](+ 2 3))= 6: ডি এটি কোনও ফাংশনে কাজ করে তবে আপাতদৃষ্টিতে ম্যাক্রোগুলির জন্য নয়: "ম্যাক্রোর মূল্য নিতে পারে না"

— নিকোনিয়ার

6

সি (জিসিসি) , 70 বাইট

o(s,a)char*s;{for(a=0;s[1];s++)a|=s[1]-*s&64|*s-s[1]&32;return a!=96;}

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

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

— nwellnhof
সূত্র

6

আর, 48 50 61 বাইট

নামহীন ফাংশন হিসাবে

function(s)sd(range(sign(diff(utf8ToInt(s)))))<1

কয়েকটি অতিরিক্ত বাইটের জন্য @ গুইসপ্পকে ধন্যবাদ।

charToRawsকাঁচা ভেক্টরে নিয়ে যায় এবং বিভক্ত হয়। এটি পূর্ণসংখ্যায় রূপান্তরিত হয় এবং একটি diffপ্রয়োগ হয়। signডিফ্সকে একটি একক করে তোলে। rangeএটি ভেক্টরকে সর্বনিম্ন এবং সর্বাধিক সরিয়ে দেয়। তারপরে স্ট্যান্ডার্ড বিচ্যুতি sdযদি 1 এর কম হয় তবে এটি সত্য

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

— MickyT
সূত্র

ব্যবহার করে আপনি 9 বাইট সংরক্ষণ করতে পারবেন function(s,d=utf8ToInt(s))all(d==sort(d))অথবাfunction(s,d=utf8ToInt(s))!is.unsorted(d)

— mnel

বা 34 বাইটের সাথে নিচে!is.unsorted(utf8ToInt(scan(,'')))

— মণি

@ মেল দুর্ভাগ্যক্রমে এগুলি বিপরীত সাজানোর উদাহরণটি পরিচালনা করে না cbaএবং cat()

— শেষটিকে

5 টি বাইট সংরক্ষণ করুন function(s)all(!diff(order(utf8ToInt(s)),,2))(বিপরীত ধরণের সাথেও কাজ করে!)

— মণেল

@ মিলন আবারও দুঃখিত, tree

— এটির

5

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

tPvGSXma

অনলাইনে চেষ্টা করে দেখুন!

ব্যাখ্যা

        % Implicitly grab the input as a string
tP      % Create a copy that is reversed
v       % Vertically concatenate these
GS      % Grab the input again and sort it
Xm      % Check if each row of the normal and reversed matrix is equal to the sorted one
a       % Check if either row matched
        % Implicitly display the result

— Suever
সূত্র

দুর্দান্ত, তবে এটি সত্য '\n'এবং এর জন্য ফিরে আসে 'Hello': /

— প্যাট্রিক বার্ড

1

@ পেট্রিকবার্ড ইনপুটটি একই রকম হবে [A-Za-z]এবং এটি প্রাথমিক পোস্টে বর্ণিত হিসাবে থাকবে । তারা "অবৈধ" বিভাগে রয়েছে কারণ তাদের স্পষ্টতই হ্যান্ডেল করার দরকার নেই।

— সোয়েভার

5

জেলি , 4 5 বাইট

Ṣm0ẇ@

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

মূলত Ṣm0wচারটি বাইটে ছিল।

ব্যাখ্যা

Ṣm0ẇ@  Input: string S
Ṣ      Sort S
 m0    Concatenate sort(S) with reverse(sort(S))
   ẇ@  Sublist exists? Check if S is contained in the previous result

— মাইল
সূত্র

আমি নিশ্চিত চারটি বাইটার ছিল, তবে এটি ভাবতে পারি নি!

— জোনাথন অ্যালান

1

... দুর্ভাগ্যক্রমে ওপি স্পষ্ট করে দিয়েছে আউটপুট সত্য / মিথ্যা নয়, তবে দুটি স্বতন্ত্র মান। ẇযদিও চারটি বাইট এখনও সম্ভব , আমি বিশ্বাস করি। সম্পাদনা: উঘ Ṣm0ẇ@।

— জোনাথন অ্যালান

@ জোনাথন অ্যালান দুর্ভাগ্য যেহেতু এটি ভাষার সত্য / মিথ্যা শৈলী ব্যবহারের মূল নিয়মটি পূরণ করেছে। অন্য ফর্ম হতে পারে Ṣẇm0$। যদি যুক্তির আদেশটি এর জন্য আলাদা না হয় wএবং ẇ...

— মাইল

দুর্দান্ত, তবে এটি অবৈধ মানগুলিতে

— প্যাট্রিক বার্ড

@ পেট্রিকবার্ড হাহ? '\n'এবং 'Hello'পুরোপুরি বৈধ মান।

— এরিক দি আউটগল্ফার

5

গণিত, 33 বাইট

0<=##||##>=0&@@ToCharacterCode@#&

এই টিপ উপর ভিত্তি করে । দুর্ভাগ্যক্রমে, এর ToCharacterCodeপরিবর্তে আমাকে ব্যবহার করতে হবে Characters, কারণ <=এবং >=স্ট্রিংগুলির তুলনা করে না।

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

4

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

param($a)$a-in-join(($b=[char[]]$a)|sort),-join($b|sort -des)

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

ইনপুট নেয় $a, তারপরে এটি -inএকটি দ্বি-উপাদান অ্যারে কিনা তা পরীক্ষা করে । অ্যারেটি তৈরি করে তৈরি করা হয় $a, এটিকে অ্যারে হিসাবে charcastালাই করে, $bপরে রাখার জন্য এটি স্টোর করে, এটিতে পাইপিং করে sort-objectযা বর্ণনামূলকভাবে সাজায় । অন্যান্য উপাদানটি ক্রমানুসারে $bসাজানো হয় -des।

— AdmBorkBork
সূত্র

4

পার্ল , 35 বাইট

সরাসরি এক্সএক্সালীকে 4 টি বাইট সংরক্ষণ করা হয়েছে এবং আরও 4 টি অপ্রত্যক্ষভাবে ধন্যবাদ।

কোড + -pFপতাকা 31 বাইট ।

@b=reverse@a=sort@F;$_=/@a|@b/x

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

কোড ইনপুটটি বাছাই করে এবং ইনপুটগুলি নিজেরাই সাজানো হয় কিনা তা পরীক্ষা করে (বা বিপরীতে ক্রমে)।

— দাদা
সূত্র

কিছুটা ভিন্ন পদ্ধতি, তবে এটি 38 বাইটে হ্রাস করে: এটি অনলাইনে চেষ্টা করুন!

— এক্সকালি

@ এক্সকালি খুব সুন্দর, ধন্যবাদ এরপরে আমরা আরও 5 টি বাইট সংরক্ষণের পরিবর্তে মুক্তি $"=$,এবং /xপরিবর্তক ব্যবহার করতে পারি।

— দাদা

3

জেলি , 5 বাইট

,Ue@Ṣ

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

কিভাবে?

,Ue@Ṣ - Main link: string
,     - pair string with
 U    - reverse(string)
    Ṣ - sorted(string)
  e@  - exists in with reversed arguments

— জোনাথন অ্যালান
সূত্র

3

বাশ + কোর্টিলস, 59 বাইট

f()(sed 's/\(.\)/\1\
/g'<<<$s|grep .|sort -c$1)
s=$1
f||f r

ইনপুট স্ট্রিংটি একটি আর্গুমেন্ট হিসাবে পাস করা হয়।

পিপিসিআই I / O পদ্ধতি দ্বারা অনুমোদিত হিসাবে আউটপুটটি প্রস্থান কোডে (সত্য হিসাবে 0, মিথ্যা জন্য 1, যথারীতি) ফিরে আসে ।

— মিচেল স্পেক্টর
সূত্র

3

পিএইচপি, 66 বাইট

$a=$s=$r=str_split($argv[1]);sort($s);rsort($r);echo$s==$a|$r==$a;

কমান্ড লাইন আর্গুমেন্ট থেকে ইনপুট নেয়। সাথে চালাও -r।

— তিতাস
সূত্র

3

রুবি , 44 বাইট

->s{[s,s.reverse].include?s.chars.sort.join}

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

— ডুমুর
সূত্র

3

র‌্যাকেট , 93 বাইট

(define(f s)(let([t(string->list s)])(or(equal?(sort t char<=?)t)(equal?(sort t char>=?)t))))

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

Ungolfed:

(define (lex-sorted? string)
  (let ([char-list (string->list string)])
    (or
     (equal? (sort char-list char<=?) char-list)
     (equal? (sort char-list char>=?) char-list))))

বাছাইটি ব্যবহার করে তারপরে মূল পদ্ধতির সাথে তুলনা করুন

— রদ্রিগো রুইজ মুরগুয়া
সূত্র

3

ব্র্যাচল্যাগ , 5 বাইট

আমি সাফল্য ছাড়াই একটি 4 বাইট সমাধান সন্ধান করার চেষ্টা করেছি, সুতরাং আপাতত এখানে আমি খুঁজে পেয়েছি সবচেয়ে আকর্ষণীয় 5 বাইট সমাধান:

:No₎?

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

o, ক্রম ক্রিয়াকলাপটি একটি প্যারামিটার নিতে পারে: 0মানে আরোহী ক্রম, 1মানে অবতরণ ক্রম। আমরা সেই পরামিতিটিকে একটি আনবাউন্ড ভেরিয়েবলে সেট করি N। ব্র্যাচল্যাগ বিভিন্ন ক্ষেত্রে N(শুধুমাত্র 0বা 1সম্ভব) এর জন্য বিভিন্ন মান চেষ্টা করবে , ফলাফলকে ইনপুট দিয়ে একীভূত করার চেষ্টা করবে এবং এই প্রচেষ্টাগুলির মধ্যে কোনওটি সফল হয়েছে কিনা তা ফিরিয়ে দেবে।

— সিংহরাশি
সূত্র

আর কাজ করে না দেখে মনে হচ্ছে :( o?|o₁?অতিরিক্ত বাইট

— থোকার

আপনি যদি কোলনকে একটি সেমিকোলন দিয়ে প্রতিস্থাপন করেন তবে কাজ করার জন্য মনে হচ্ছে। আর এক বাইট-লম্বা বৈকল্পিক হবে o{|↔}?।

— অবিকৃত স্ট্রিং

2

ম্যাটল্যাব / অক্টোবায়, 38 বাইট

@(x)any(all([x;flip(x)]'==sort(x)',1))

অনলাইন ডেমো

— Suever
সূত্র

2

জাভাস্ক্রিপ্ট (ES6) 74 62 50 47 43 বাইট

([...a],b=a+'')=>b==a.sort()|b==a.reverse()

কিছু গল্ফিং এবং বাগফিক্সিংয়ের পরে, এই উত্তরটি ETHPr Productions এর মতো অনেকটাই সমান হয়ে গেছে, সুতরাং দয়া করে তার উত্তরটি পরীক্ষা করে দেখুন এবং একটি উত্তর দিন +1।

— লুক
সূত্র

বাগ স্থির করে ..

— লুক

1

আপনি আমাকে

— লূক

আমি বাগের কারণটি খুঁজে পেয়েছি এবং এখন সমস্ত কিছু

— লূক

বাগ ফিরে এসেছে ... repl.it/FZrs/2

— স্টেইনবার্গ

1

ঠিক আছে, এটি এখন বেশিরভাগই @ ETHPr Productions এর উত্তর, তাই আমি একটি বিজ্ঞপ্তি যুক্ত করেছি। দয়া করে +1তার উত্তর দিন।

— লুক 20

2

হাস্কেল, 54 50 বাইট

t a=or[and(zipWith(<=)`f`tail$a)|f<-[(=<<),(<*>)]]

ব্যবহারের উদাহরণ: t "defggh"-> True। এটি অনলাইন চেষ্টা করুন! ।

হয়তো ব্যবহার sortমে অন্যান্য উত্তর মত খাটো যদিও এটি প্রয়োজন import Data.List। এখানে একটি পৃথক পদ্ধতির:

প্রতি ফাংশন জন্য fথেকে [(=<<),(<*>)], ক্যালকুলেট and(zipWith(<=)`f`tail$a)এবং হতে ফলাফল কোন প্রয়োজন True। কাজগুলি হয়

((=<<) (zipWith(<=)) tail) a
((<*>) (zipWith(<=)) tail) a

উভয় ইনপুট তালিকার প্রতিবেশী উপাদানের তুলনা সঞ্চালন যা aদিয়ে <=কিন্তু আর্গুমেন্ট সহ এক একটি ফলে ফ্লিপ >=। andসমস্ত তুলনা হয় কিনা তা পরীক্ষা করে দেখুন True।

— nimi
সূত্র

2

পুশি , 7 বাইট

ogoGo|#

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

ব্যাখ্যা:

      \ Implicit: Input on stack as charcodes
og    \ Check if the stack is sorted ascendingly (Push 0/1)
oG    \ Check if the stack is sorted descendingly (Push 0/1)
      \   - Note that this will work regardless of the first check, as input
      \     is guaranteed to be /[A-Za-z]+/
o|    \ Bitwise OR
#     \ Print the result

— FlipTack
সূত্র

এটি একটি স্বতন্ত্র সত্য-মান দেয় না।

— স্টেইনবার্গ

1

@steenbergh না, কিন্তু এটি সন্তুষ্ট আমাদের মেটা ঐক্যমত্য কি truthy বা falsy যেমন গন্য উপর - 1এবং 2হয় Trueবিরক্তিকর ভাবে আত্মসাম্মুখ্যপূর্ণ মধ্যে, যেহেতু 0হয় False।

— ফ্লিপট্যাক

পুশির যদি কিছুটা চালিত বা অপারেটর থাকে তবে তার পরিবর্তে এটি কাজ করা উচিত।

— ইটিএইচ প্রডাকশনগুলি

@ ফ্লিপট্যাক আমি ভেবেছিলাম এটি চ্যালেঞ্জের মধ্যে স্পষ্ট, তবে আমি এখন এটি আরও নির্দিষ্ট করে দিয়েছি: সমস্ত পরীক্ষার ক্ষেত্রে সত্যের অবশ্যই একই মান আউটপুট করা উচিত। একই মিথ্যা জন্য যায়।

— স্টেইনবার্গ

@ সটেনবার্গ মেটা sensক্যমতের কারণ আছে এবং তা বোঝা যায়, তবে আপনি যদি জেদ করেন ...

— ফ্লিপট্যাক

2

পাইথ, 5 বাইট

}Q_BS

এমন একটি প্রোগ্রাম যা একটি "quoted string"এবং প্রিন্টগুলি Trueবা Falseযথাযথ হিসাবে ইনপুট নেয় ।

পরীক্ষা স্যুট

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

}Q_BS   Program. Input: Q
}Q_BSQ  Implicit variable fill
 Q      Is Q
}       in
    SQ  Q sorted
   B    or
  _     Q sorted reversed?
        Implicitly print

— TheBikingViking
সূত্র

আপনি একটি বাইট সংরক্ষণ (এবং সবচেয়ে কম উত্তর হয়ে) প্রতিস্থাপন করতে পারে এমন }Qসঙ্গে /, যা একটি অন্তর্নিহিত ব্যবহার Q।

— isaacg

2

অক্টাভা, 24 বাইট

@(s)issorted(s,'either')

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

— rahnema1
সূত্র

2

জিএনইউ সেড, 97 + 1 (আর পতাকা) = 98 বাইট

অক্ষর আদেশ হয়, স্ক্রিপ্ট ফেরৎ 1, অন্যথায় 0। সেডে কোনও ডেটা টাইপ নেই।

s:$: zyxwvutsrqponmlkjihgfedcba:
s:(.*(.)(.).* ).*\2.*\3.*:\1abcdefghijklmnopqrstuvwxyz:i
//c0
c1

সমস্ত অক্ষরকে আরোহণের ক্রমে সাজানো হয়েছে কিনা তা পরীক্ষা করতে, আমি প্রতিটি উতরিত বর্ণমালায় প্রতিটি জোড় অক্ষরের টেবিল অনুসন্ধান করি, এটিই আমি একটি পাল্টা উদাহরণ খুঁজে পাওয়ার চেষ্টা করি। নোট করুন যে //আসলে সর্বশেষ নিয়মিত প্রকাশের মিলটি পুনরাবৃত্তি করে! (2 এবং 3 লাইন দেখুন)

চালনার উদাহরণ: স্ক্রিপ্টটি প্রতি লাইনে একাধিক ইনপুট শব্দ পরীক্ষা করতে পারে

me@LCARS:/PPCG$ echo -e "tree\nABCDC" | sed -rf word_ordered.sed
1
0

— seshoumara
সূত্র

2

সিজেম , 12 11 বাইট

q_$_W%+\#)g

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

ব্যাখ্যা

q            Push the input
 _$          Duplicate and sort
   _W%       Duplicate and reverse
      +      Concatenate the sorted and the reversed strings
       \     Bring input to the top
        #    Find the index of the input in the other string; returns -1 if not found
         )   Increment
          g  Signum (coerces to 0 or 1)

— ব্যবসায় বিড়াল
সূত্র

2

8086 মেশিন কোড, 68 61 48 46 45 39 বাইট

00000000  b2 31 be 82 00 ac 9f 88  c3 ac 3c 0d 74 14 38 c3  |.1........<.t.8.|
00000010  74 f5 e3 03 b1 00 9f 77  05 9e 76 ea eb 03 9e 77  |t......w..v....w|
00000020  e5 4a b4 02 cd 21 c3                              |.J...!.|
00000027

জমা দেওয়া থেকে:

org 0x100
use16
    mov dl, 0x31
    mov si, 0x82
    lodsb
a:  lahf
b:  mov bl, al
    lodsb
    cmp al, 0x0d
    je y
    cmp bl, al
    je b
    jcxz @f
    mov cl, 0
    lahf
@@: ja @f
    sahf
    jbe a
    jmp n
@@: sahf
    ja a
n:  dec dx
y:  mov ah, 0x02
    int '!'
    ret

— user5434231
সূত্র

2

স্কালা, 47 বাইট

def f(x:String)=x==x.sorted|x==x.sorted.reverse

— আরিয়া অক্ষ
সূত্র

এই শব্দটি কি লেক্সিকালি অর্ডার করা হয়েছে?

ইনপুট

আউটপুট

অতিরিক্ত বিধি

পরীক্ষার মামলা

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

পাইথন 2 , 53 44 40 39 বাইট

হাস্কেল , 33 বাইট

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

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

জাভাস্ক্রিপ্ট (ES6), 43 বাইট

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

ক্লোজার, 47 বাইট

সি (জিসিসি) , 70 বাইট

আর, 48 50 61 বাইট

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

জেলি , 4 5 বাইট

ব্যাখ্যা

গণিত, 33 বাইট

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

পার্ল , 35 বাইট

জেলি , 5 বাইট

কিভাবে?

বাশ + কোর্টিলস, 59 বাইট

পিএইচপি, 66 বাইট

রুবি , 44 বাইট

র‌্যাকেট , 93 বাইট

ব্র্যাচল্যাগ , 5 বাইট

ম্যাটল্যাব / অক্টোবায়, 38 বাইট

জাভাস্ক্রিপ্ট (ES6) 74 62 50 47 43 বাইট

হাস্কেল, 54 50 বাইট

পুশি , 7 বাইট

পাইথ, 5 বাইট

অক্টাভা, 24 বাইট

জিএনইউ সেড, 97 + 1 (আর পতাকা) = 98 বাইট

সিজেম , 12 11 বাইট

8086 মেশিন কোড, 68 61 48 46 45 39 বাইট

স্কালা, 47 বাইট