একটি অ্যারের মধ্যে দীর্ঘতম শব্দটি সন্ধান করুন

24

আপনার চ্যালেঞ্জ হ'ল স্ট্রিংগুলির একটি অ্যারে নেওয়া এবং অ্যারেতে দীর্ঘতম স্ট্রিং আউটপুট করা। অনেক দূরে

["tiny", "small", "bigger", "biggest"]

আউটপুট হবে biggest।

অ্যারের দুটি উপাদানগুলির দৈর্ঘ্য যদি একই হয় তবে আপনার অ্যারেতে প্রথম প্রদর্শিত হওয়া উচিত। এর অর্থ যদি অ্যারেটি দেখতে এমন হয়:

["one", "two", "no"]

আউটপুট হয় one, তবে অ্যারেটি যদি এমন দেখায়:

["two", "one", "no"]

আউটপুট হয় two।

এটি কোড-গল্ফ হিসাবে , বাইটের মধ্যে সংক্ষিপ্ততম কোডটি জয়ী।

code-golf  string  array-manipulation  sorting 
— লুক্কায়িতভাবে
সূত্র
3
2 নোট: 1এটা ব্যাপকভাবে নিরুৎসাহিত হলে প্রশ্ন পরিবর্তিত হয় এবং অকার্যকর করে বিদ্যমান উত্তর, এবং স্যান্ডবক্স ঠিক জন্য বিদ্যমান যে কারণে (নিশ্চিত চ্যালেঞ্জ করতে পোস্ট করার আগে ভাল হয়)2
— user202729
4
যেহেতু আমি মনে করি না যে অন্য কেউ এটি উল্লেখ করেছে - হাই, এবং পিপিসিজিতে আপনাকে স্বাগতম!
— অ্যাডমবর্কবার্ক
1
না আপনি অ্যারে খালি যেখানে কেস পরিচালনা করতে হবে না। তবে আপনি চাইলে পারবেন।
— ডগগো
4
২ ঘন্টা? বহুদূর, পর্যন্ত খুব দ্রুত একটি উত্তর গ্রহণ করা হবে।
— শেগি
6
সাধারণত আপনি এক সপ্তাহ অপেক্ষা করেন
— ক্রিস্টোফার

উত্তর:

31

ইমপিটেটিভ ট্যাম্পিও , 168 বাইট

Listan x on riippuen siitä,onko sen ensimmäisen alkion pituus suurempi tai yhtä suuri kuin sen jokaisen alkion pituus,joko sen ensimmäinen alkio tai sen hännän x.

অনলাইন সংস্করণ

Ungolfed:

Listan পিসিন alkio উপর riippuen siitä , onko সেন ensimmäisenalkion pituus suurempi Tai yhtä suuri kuin সেন jokaisen alkion pituus, জোকো

  • সেন ensimmäinenআলকিও তাই
  • সেন hänn pn pisin alkio।

অনলাইন সংস্করণ

এর একমাত্র গল্ফিংয়ের সুযোগটি প্রতিস্থাপন করা pisin alkio(যার অর্থ "দীর্ঘতম উপাদান") এর সাথে x।

অনুবাদ:

তালিকার দীর্ঘতম আইটেমটি তালিকার প্রতিটি উপাদানের দৈর্ঘ্যের চেয়ে বড় বা সমান কিনা তার উপর নির্ভর করে

  • তালিকার প্রথম আইটেম, বা
  • তালিকার লেজের দীর্ঘতম আইটেম।
— fergusq
সূত্র
21
এটি কি একটি -... না কি করে! আপনি কী করেন?
— auhmaan
3
ফিনিশ থেকে গুগল অনুবাদ: এক্সের তালিকাটি প্রথম উপাদানটির দৈর্ঘ্য প্রতিটি উপাদানের দৈর্ঘ্যের চেয়ে বড় বা সমান কিনা তার উপর নির্ভরশীল, এক্সটি এর আইটেম বা লেজ নয়।
— অ্যাডম
2
@ অ্যাডাম আমি ভাবতাম যে এপিএল পড়া খুব কঠিন। স্পষ্টতই আপনার যা হারাতে হবে তা হ'ল গেমফিল্ডটি এমন একটি ভাষায় নিয়ে যাওয়া যেখানে ইংলিশ একটি বিরল পণ্য।
— Uriel
3
কাদের সিওবিএল, অ্যাপলস্ক্রিপ্ট বা ইনফর্ম 7 দরকার? কার দরকার আর্নল্ড শেফ বা শেক্সপিয়ার? আপনার অত্যাধিক ট্যাম্পিও আছে! ওহ আমার উড়ন্ত স্প্যাগেটি দানব, সব ভাষার ফিনিশ? আমি শিগগিরই তা আর শিখছি না ...
— ফেডারেশন এস।
1
@fedes। আপনি বলতে পারেন "ওলকুন সুমোমালাইনেন সুডেলমা ইউসি সুডেলমা।" (ফিনিশ চুম্বনকে একটি নতুন চুম্বন হতে দিন, এটি একটি নতুন চুম্বনের বস্তু তৈরি করে)
— ফার্গুসক
20

পাইথন , 23 বাইট

lambda a:max(a,key=len)

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

— নিল
সূত্র
1
আমি দুঃখিত যে আমি এই অধিকারটি রূপান্তর করি নি।
— ডগগো
1
আমি কোড স্নিপেট আপডেট করেছি, তবে যেমন লেখা আছে, এটি ইতিমধ্যে এই কার্যকারিতা অর্জন করে।
— নিল
1
এটি পাইথন 3-এ অপরিবর্তিত কাজ করবে
— বেনামে
17

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

-3 বাইট জাগর্বকে ধন্যবাদ।

foldl1(!)
a!b|(a<$a)<(a<$b)=b|1<2=a

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

আমি এই কোডটি পছন্দ করি তুমি জানো কেন? কারণ হাস্কেল এলোমেলো লাইব্রেরি থেকে ফাংশন সহ আরও অনেক মার্জিত সমাধানগুলি সমর্থন করে।

maximumBy(compare`on`length).reverse

এটাই ফ্রিগিন 'পঠনযোগ্য! ব্যতীত, এটি বৈধ নয়।

import Data.List
import Data.Function
maximumBy(compare`on`length).reverse

যদি এটি আমদানির জন্য না হয়, সমস্ত উত্স পেতে এটি একটি নিখুঁত জমা ছিল। : P: P

(এছাড়াও, এটিতে একটি গল্ফিং টিপ ব্যবহৃত হয় এবং এটি একটি ভাঁজ ব্যবহার করে))

— totallyhuman
সূত্র
2
প্রয়োজনীয় "প্রথম-ঘটনা-টাই-অফ-টাই"-প্রয়োজনীয়তাটি প্রকাশের পরে, এই সৌন্দর্যটি কাজ করবে: snd.maximum.map((,)=<<(0<$)) এটি অনলাইনে চেষ্টা করুন! ।
— লাইকনি
1
কেবলমাত্র রেফারেন্সের জন্য: সেখানে অন্তর্নির্মিত 29 বাইট রয়েছে import Data.Lists;argmax(0<$)।
— নিমি
1
ওহ, কিভাবে lএকটি অংশ না fold? এটি এবং এটির নামের একটি কার্যক্রমে কীভাবে পার্থক্য করতে পারে foldl?
— 12
1
@ 12Me21 এটি ফাংশন নামের অংশ foldl1। আমি ভেবেছিলাম ব্যাখ্যার যে অংশ, বিভ্রান্তিকর হতে পারে দুঃখিত ...
— totallyhuman
1
ল্যাম্বদার পরিবর্তে একটি ফাংশন সহ 35 বাইট । মজার বিষয় হল, আপনাকে অবশ্যই বা অন্য কিছু 0দিয়ে প্রতিস্থাপন aকরতে হবে, অন্যথায় জিএইচসি একটি দ্ব্যর্থক সংখ্যাসূচক প্রকারের জন্য অভিযোগ করবে।
— Zgarb
9

আর + পিআর , 31 বাইট

[-2 বাইটস স্ক্রুবলকে ধন্যবাদ]

pryr::f(x[order(-nchar(x))][1])

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

আর , 33 বাইট

function(x)x[order(-nchar(x))][1]

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

— NofP
সূত্র
3
এছাড়াও 33 বাইট:x[which.max(nchar(x))]
— জিউসেপ
আপনার লিঙ্ক থেকে @ ক্রুবল আমি একটি 33 বাইট সমাধান দেখতে পাচ্ছি।
— NofP
1
@ নোফপি হা হা, আমাকে চুপচাপ। 31 বাইট।
— খুলনায়সথ না'বাড়িয়া
8

সীমা অতিক্রম করা, 36 42 বাইট

=INDEX(A:A,MATCH(MAX(LEN(A:A)),LEN(A:A),))

অ্যারে সূত্র হিসাবে প্রবেশ করা হয়েছে (সিটিআরএল-শিফট-এন্টার)। ইনপুট অ্যারেটি কলাম এ প্রবেশ করা উচিত A.

সূত্রটি সর্বোচ্চ দৈর্ঘ্যের সাথে প্রথম ম্যাচটি দেয় returns

আপনার অঞ্চলের সেটিংস উপর নির্ভর করে, বিকল্প ,সঙ্গে ;; কোড দৈর্ঘ্য অপরিবর্তিত রয়েছে। এখানে তালিকাভুক্ত 16 টি ভাষার মধ্যে ইংরেজি ফাংশনের নামগুলি এই সূত্রের জন্য সবচেয়ে সংক্ষিপ্ত।

ব্যাখ্যা:

=                                          - return
 INDEX(                                  ) - the item of
       A:A                                 - the input
          ,                                - at
           MATCH(                       )  - the position of
                                       ,   - the first exact match of
                 MAX(        )             - the maximum of
                     LEN(   )              - the array of lengths of
                         A:A               - the input
                              ,            - in
                               LEN(   )    - the array of lengths of
                                   A:A     - the input
— pbeentje
সূত্র
,পরবর্তীকালের জন্য কী ? সূত্রটি এটি ছাড়া এখনও কাজ করে
— আনাস্তাসিয়া-রোমানোভা 秀
ফাইনাল ম্যাচের ,একটি প্যারামিটার যা (সংশোধিত) প্রশ্নের দ্বারা প্রয়োজনীয় যথাযথ ম্যাচটি ফেরত দেয়। যদি এটি বাদ পড়ে যায় তবে ম্যাচটি আরোহী ক্রমে একটি অ্যারের প্রত্যাশা করে এবং একই দৈর্ঘ্যের একাধিক উপাদান থাকলে প্রথমটির পরিবর্তে শেষ ম্যাচটি ফেরত দেয় ।
— pbeentje
নিশ্চিত? আমি এই দুটি সূত্র তুলনা করেছি এবং উভয়ই একই ফলাফল নিয়ে এসেছি
— আনাস্তাসিয়া-রোমানোভা 秀
আপনি কি কোনও ইনপুট অ্যারে ব্যবহার করছেন যা একই দৈর্ঘ্যের দুটি (পৃথক) স্ট্রিং রয়েছে? কমা (সেমিকোলন) বের করা রেখে আমাকে সর্বাধিক দৈর্ঘ্য শেষ স্ট্রিং দেয়, ... আশানুরূপ (সীমা অতিক্রম করা 2016, 64-বিট)
— pbeentje
দুর্ভাগ্যক্রমে সম্প্রদায়টি সিদ্ধান্ত নিয়েছে যে এইভাবে নামযুক্ত রেঞ্জগুলি ব্যবহার করা অবৈধ তাই আমি আপনাকে পরামর্শ দিই যে এই বিশেষ ক্ষেত্রে আপনি ব্যবহার করতে স্যুইচ করুন A:Aএবং এটিকে একটি অ্যারে আনুষ্ঠানিক করুন {...}, অন্যথায় দুর্দান্ত পোস্ট!
— টেলর স্কট
7

প্রোলগ (এসডাব্লুআই) , 98 92 72 69 বাইট

শীর্ষ স্তরের ভবিষ্যদ্বাণীটি হয় *।

X/Y:-atom_length(X,Y).
[A]*A.
[A,B|L]*Z:-A/X,B/Y,Y>X,[B|L]*Z;[A|L]*Z.

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

ব্যাখ্যা

প্রথম সারিতে ডায়ডিক প্রিকিকে /সংক্ষিপ্ত হিসাবে সংজ্ঞায়িত করা হয় atom_length/2যার জন্য সত্য যদি প্রথম যুক্তির দৈর্ঘ্য দ্বিতীয় যুক্তি হয়। এটি আমাদের atom_lengthদু'বার ব্যবহার করে 3 বাইট সাশ্রয় করে ।

আমাদের মূল শিকারীকে ডায়াডিক হিসাবে সংজ্ঞায়িত করা হয় *যেখানে প্রথম যুক্তি একটি তালিকা এবং দ্বিতীয় যুক্তি সেই তালিকার দীর্ঘতম উপাদান।

দ্বিতীয় সারিটি আমাদের বেস কেস যা বলে যে একটি উপাদান তালিকার দীর্ঘতম উপাদানটি সেই উপাদান।

তৃতীয় সারিতে বলা হয়েছে যে কমপক্ষে 2 টি উপাদান সহ একটি তালিকার জন্য দীর্ঘতম উপাদানটি হ'ল:

দ্বিতীয় উপাদানটির দৈর্ঘ্য যদি প্রথম উপাদানটির চেয়ে দীর্ঘ হয় তবে দীর্ঘতম উপাদানটি প্রথম উপাদান ছাড়াই তালিকায় থাকে।

অন্যথায় দীর্ঘতম উপাদানটি দ্বিতীয় উপাদান ছাড়াই তালিকায় রয়েছে।

— Emigna
সূত্র
আমি এটি কীভাবে কাজ করে তার একটি ব্যাখ্যা দেখতে আগ্রহী
— ক্রিটসি লিথোস
@ কউসকিউক: আমি একটি সংক্ষিপ্ত ব্যাখ্যা যুক্ত করেছি।
— Emigna
7

পাইথ , 4 বাইট

h.Ml

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

ব্যাখ্যা 
h.Ml   | Program
h.MlZQ | With implicit variables filled in
-------+--------------------------------------------------------------------
h      | First element of
 .M  Q | The list of elements from the input list with the maximal value for
   lZ  | The length of the element
— মিঃ এক্সকোডার
সূত্র
OU সুন্দর আপনি পাইথ উত্তরটি 6 বাইট সুন্দর দিয়ে পরাজিত করেছেন।
— ডোগগো
elD_এবং ho_lএকই দৈর্ঘ্য অর্জন।
— isaacg
1
@ hakr14 সম্পাদনার জন্য আপনাকে অনেক ধন্যবাদ!
— মিঃ এক্সকোডার
6

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

($args[0]|sort l* -d)[0]

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

লাগে ইনপুট $args[0], পাইপ যে Sort-Objectএর উপর ভিত্তি করে lএ ength -dঅর্ডার escending। তারপরে এটি গ্রহণ করবে [0]। যেহেতু বাছাই স্থিতিশীল, তাই টাইয়ের ক্ষেত্রে এটি প্রথম উপাদানটি নেয়।

— AdmBorkBork
সূত্র
1
সুন্দর নাম wuff wuff: ডি
— ডোগগো
6

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

@(x)x{[~,p]=max(cellfun(@nnz,x))}

ইনপুট স্ট্রিংগুলির একটি সেল অ্যারে।

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

ব্যাখ্যা

cellfun(@nnz,x)nnzইনপুট অ্যারেতে প্রতিটি স্ট্রিংয়ে ফাংশন (ননজারের সংখ্যা) প্রয়োগ করে x। ASCII স্ট্রিংগুলির জন্য, (উপাদানের সংখ্যা) এর nnzসমতুল্য numel, তবে কম। ফলাফলটি স্ট্রিং দৈর্ঘ্যের সাথে একটি সংখ্যাসূচক অ্যারে হয়।

তারপরে, [~,]=max(...)স্ট্রিং দৈর্ঘ্যের অ্যারেতে প্রথম সর্বোচ্চটিকে সূচক দেয়। ফলসটি xসম্পর্কিত স্ট্রিংটি পেতে কার্লি-ব্রেস সূচক হিসাবে ব্যবহৃত হয় ।

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

জাভাস্ক্রিপ্ট (নোড.জেএস) , 38 বাইট

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

a=>a.sort((a,b)=>a.length<b.length)[0]
— LiefdeWen
সূত্র
@ ডাগগো এটি টাইয়ের ক্ষেত্রে প্রথম উপাদানটি ফেরত দেয়।
— LiefdeWen
1
সাজানোর () কলব্যাকে সাইন ইন করা সংখ্যার পরিবর্তে বুলিয়ান ফিরিয়ে দেওয়া সমস্ত জেএস ইঞ্জিনে কাজ করে না (যেমন এটি এজ তে কাজ করে না)। আর একটি পদ্ধতির মতো কিছু হবে , যা 1 বাইট সংক্ষিপ্ত। তবুও, কোনও গ্যারান্টি নেই যে টাইয়ের ক্ষেত্রে ব্রাউজারগুলিতে প্রথম আইটেমটি ধারাবাহিকভাবে বেছে নেওয়া হবে।
— আর্নল্ড
তবে যদি এটি টিআইও-তে
— নোড.জেজে
1
তুলনামূলক ফাংশনের -পরিবর্তে আপনার ব্যবহার করা উচিত <।
— kamoroso94
1
@ লিফডওয়েইন হ্যাঁ, তবে এটি মন্তব্যে থাকা সমস্যাগুলিকে সম্বোধন করে।
— সেবাস্তিয়ান সাইমন
5

জে , 19, 11, 10 8 বাইট

0{>\:#@>

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

ইঙ্গিতটির জন্য স্ট্রিস্টারকে ধন্যবাদ!

ফ্রাউনফ্রোগের জন্য -1 বাইট ধন্যবাদ!

-২ বাইটস কনর ওব্রায়েনকে ধন্যবাদ

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

    (  #@>) - unbox each string and find its length
     \:     - sort down the list of strings according to the lengths
0{::        - take and unbox the first string

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

— গ্যালেন ইভানভ
সূত্র
1
এটি কেতে আমার প্রাথমিক পদ্ধতির ছিল, কিন্তু তখন আমি বুঝতে পেরেছিলাম যে আমি কেবল গণনা অনুসারে তালিকাটি সাজানো, উতরাই এবং প্রথম আইটেমটি নিতে পারি ... আপনি জেতে একই জিনিস করতে পারেন?
— স্ট্রিস্টার
@ স্ট্রিস্টস্টার - ধন্যবাদ! আমি ঠিক বুঝতে পেরেছি। আমি এখন এটি চেষ্টা করতে যাচ্ছি, এটি অনেক কম হবে।
— গ্যালেন ইভানভ
1
এই বিন্দুটির বাইরে কোনও বন্ধনী নেই:0{::]\:#@>
— ফ্রেউনিফ্রোগ
Would {.@পরিবর্তে 0{::কাজ করে?
— ক্রিটিকি লিথোস
1
8 বাইট:0{>\:#@>
— কনর ও'ব্রায়েন
4

সি #, 43 + 18 = 61 বাইট

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

a=>a.OrderByDescending(x=>x.Length).First()
— LiefdeWen
সূত্র
@ ডাগগো এটি টাইয়ের ক্ষেত্রে প্রথম উপাদানটি ফেরত দেয়।
— LiefdeWen
@ লিফডওয়েইন অর্ডারবি স্থিতিশীল তাই এটি টাইয়ের ক্ষেত্রে শেষ উপাদানটি ফিরিয়ে দেবে। উদাহরণ: tio.run/##TY7BCsIwDIbvfYqwUwvaF5jbQcHTRMGDB/…
— গ্রেজগোর্জ পুয়াউস্কি
1
@ গ্রজেগোর্জপুয়াউস্কি ওহ, আমি দেখতে পেয়েছি।
— লিফডওয়েেন
আমি কয়েকটি পেয়েছি সম্ভবত কেউ a=>a.Aggregate((x,y)=>y.Length>x.Length?y:x)44 বাইট বেস, a=>a.First(x=>x.Length==a.Max(y=>y.Length))43 বাইট বেস ছোট করতে সহায়তা করতে পারে
— মনসো
1
@ এমআরলরে এটি আমার প্রথম সমাধান ছিল তবে তারপরে এটি শেষটিকে ফিরে আসে, কারণ আদেশ অকার্যকর।
— LiefdeWen
3

কে (ওকে) , 9 বাইট

*x@>#:'x:

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

উদাহরণ:

*x@>#:'x:("edur";"oot";"taht")
"edur"

ব্যাখ্যা

*x@>#:'x: / solution
       x: / store input in variable x
    #:'   / count (#:) each (')
   >      / sort descending
 x@       / apply indices to x
*         / take the first one

নোট:

এটিকে মুছে ফেলা মূলত 5 টি পদক্ষেপ থাকা সত্ত্বেও অ-তুচ্ছ হিসাবে শ্রেণিবদ্ধ করা হয় (যদি ফাংশন হিসাবে লেখা হয় তবে {*x@>#:'x})।

— streetster
সূত্র
3

জাভা (ওপেনজেডিকে 8) , 67 বাইট

আমার প্রিয় ভাষায় আর একটি জমা! (পড়ুন: আমি একমাত্র জানি)।
এটি খালি অ্যারে দিয়ে কাজ করে না, তবে এটি ঠিক আছে।

Golfed

w->{for(String y:w)if(y.length()>w[0].length())w[0]=y;return w[0];}

Ungolfed

for(String y:w)                           // Loops through all Strings
    if(y.length()>w[0].length())          // If the String is longer than the first String 
                                w[0]=y;   // Store it as the first string.
return w[0];                              // Return the first String.

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

— লুক স্টিভেন্স
সূত্র
3

র‌্যাকেট , 160 বাইট 110 বাইট

এটি অনলাইন চেষ্টা করুন! প্রথমবার অবদান, পরামর্শ প্রশংসা!

(define(m a)(if(>(length a)1)(if(>=(string-length(car a))(string-length(m(cdr a))))(car a)(m(cdr a)))(car a)))

Ungolfed

(define (m a)
    (if (> (length a) 1)
        (if (>= (string-length (car a)) (string-length (m (cdr a))))
            (car a)
            (m (cdr a))
        )
        (car a)
    )
)

প্রতিক্রিয়া ভিত্তিক আপডেট সমাধান

— ড্যানিয়েল ল্যামবার্ট
সূত্র
4
আমি সম্প্রদায়ের পক্ষ থেকে পিপিসিজিতে স্বাগতম বলতে চাই! আমি লক্ষ্য করেছি যে আপনার দ্রষ্টব্যগুলি স্পষ্টতই তালিকার জন্য ব্যর্থ হয় যেখানে দীর্ঘতম স্ট্রিংয়ের শেষে রয়েছে। উদাহরণ এখানে । আমি র‌্যাকেটটি ভালভাবে মনে নেই, তবে আপনি যদি করতে পারেন তবে আমি আপনার অ্যালগরিদমকে foldrবেস ভিত্তিক পদ্ধতির পরিবর্তনের পরামর্শ দিয়েছি , সর্বোচ্চ দৈর্ঘ্য নিয়ে এবং এটি পেরিয়ে যেতে।
— কোলে
ওহ হু। এটি নির্দেশ করার জন্য আপনাকে ধন্যবাদ। আমি বিশ্বাস করতে পারি না যে আমি এটি পরীক্ষা করি নি।
— ড্যানিয়েল ল্যামবার্ট
এছাড়াও আপনি পরিবর্তন করতে পারেন define(m a)থেকেλ(a)
— fede গুলি।
1
আপনি না থাকলে টিপসও পরীক্ষা করে দেখুন !
— ফেডারেশন এস।
3

স্ক্র্যাচ 27 17 170 160

কোড ছবি

এটি বিশ্বব্যাপী (সমস্ত স্প্রিটের সাথে সংযুক্ত, আরও সুনির্দিষ্ট হওয়ার জন্য) ডাকা স্ট্রিংগুলির তালিকা প্রত্যাশা করে mylist। সবুজ পতাকাটিতে ক্লিক করার পরে, দীর্ঘতম শব্দটি ভেরিয়েবলের মধ্যে ছেড়ে যাবে w।

আমি মনে করি এটি লিঙ্ক

when gf clicked
set[w]to(item[1]of[mylist
set[i]to[0
repeat(length of[mylist
change[i]by(1
set[m]to(item(i)of[mylist
if<(m)>(w)>then
set[w]to(m
end
end
stop[all

এই মেটা অনুযায়ী গণনা করা হচ্ছে ।

— ফেডারেশন এস।
সূত্র
stop[allএখানে কি দরকার ?
— ggorlen
3

Röda , 30 বাইট

{enum|[[#_,-_,_1]]|max|_|tail}

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

ব্যাখ্যা:

{
 enum|         /* For each element, push its index to the stream */
 [[#_,-_,_1]]| /* For each element and index, push [length, -index, element] */
 max|          /* Find the greatest element */
 _|            /* Flat the list in the stream */
 tail          /* Return the last item in the stream */
}

বিকল্প 30 বাইট:

{enum|[[#_,-_,_1]]|max|[_[2]]}

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

— fergusq
সূত্র
আমার jq উত্তর আপ লিখন আমাকে তৈরি বুঝতে পারি যে enumবাদ যাবে না, এবং পরিবর্তে থেকে সর্বনিম্ন [[-#_,_1]], নির্বাচিত করা যেতে পারে tio.run/...
— Kritixi Lithos
@ কউজক্যাক যা কাজ করে না কারণ তারপরে minঅক্ষরগুলি দ্বিতীয় বর্ণানুক্রমিকভাবে তুলনা করবে (কারণ অ্যারেগুলি তাদের দ্বিতীয় আইটেমের সাথে দ্বিতীয়ভাবে তুলনা করা হয়)। উদাহরণস্বরূপ ইনপুট আউটপুট হিসাবে ["b", "a"]দিতে হবে "a"। আমার সম্ভবত minby
— রদা
3

এপিএল - 23 16 বাইট

a←{((⍴¨⍵)⍳(⌈/(⍴¨⍵)))⌷⍵}

আপনার দুর্দান্ত পরামর্শ এবং উত্সাহের জন্য সবাইকে ধন্যবাদ!

a←{⍵⌷⍨(⍴¨⍵)⍳⌈/⍴¨⍵}

ব্যবহার:

a 'duck' 'duck' 'goose'
  'goose'

ব্যাখ্যা:

অক্ষরের প্রতিটি ভেক্টরের দৈর্ঘ্য (স্ট্রিং) পরে সূচক হিসাবে সর্বাধিক ব্যবহার করে। আমি মাত্র 20 মিনিট আগে এপিএল শুরু করেছি তাই এটি করার মতো বোকা উপায় হলে আমি দুঃখিত।

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

(স্বচ্ছতার জন্য সম্পাদিত)

— rmoro
সূত্র
1
পিপিসিজিতে আপনাকে স্বাগতম!
— স্টেডিবক্স
a←আপনার bytecount প্রতি গণনা করা হয়।
— ক্রিটিকি লিথোস
কখনই ভুলবেন না এপিএলকে ডান থেকে বামে মূল্যায়ন করা হয়: (⌈/(⍴¨⍵))=> ⌈/⍴¨⍵। এছাড়াও, (...)⌷⍵=> ⍵⌷⍨...একটি বাইট সংরক্ষণ করতে
— Zachharý
প্রথম বন্ধনী ব্যতীত, এটি আসলে বেশ ভাল বলে মনে হচ্ছে!
— জ্যাকারি
2

স্ট্যান্ডার্ড এমএল (এমএলটন) , 55 বাইট

fun&(s::r)=foldl(fn(%,$)=>if size% >size$then%else$)s r

এটি অনলাইন চেষ্টা করুন! ব্যবহারের উদাহরণ: & ["abc","de","fgh"]ফলন "abc"।

Ungolfed:

fun step (current, longest) = 
    if size current > size longest 
    then current 
    else longest

fun longestString (start :: list) = foldl step start list
  | longestString nil = raise Empty

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

— Laikoni
সূত্র
2

ফানকি , 38 বাইট

a=>a[(v=a::map@#)::find(math.max...v)]

ব্যাখ্যা

a=>a[(v=a::map@#)::find(math.max...v)]
        a::map@#                        $ Create a list of the lengths of the input's strings.
      v=                                $ And assign it to v.
     (          )::find(            )   $ Find the first index in this list that equals...
                        math.max...v    $ The largest value of v, eg. the length of the longest string.
   a[                                ]  $ Get the value at that position.

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

— ATaco
সূত্র
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.