আমার ত্রিভুজ ঠিক আছে?


47

a, b, cত্রিভুজের তিনটি বাহুর দৈর্ঘ্য দেওয়া , ত্রিভুজটি সমকোণী (যেমন একটি কোণ 90 ডিগ্রির সমান) রয়েছে কিনা তা বলুন।

ইনপুট

যে কোনও ক্রমে তিনটি ধনাত্মক পূর্ণসংখ্যার মান

আউটপুট

উভয় ক্ষেত্রেই একটি নির্দিষ্ট সত্য আউটপুট ( true, 1, yes, ...) বা একটি নির্দিষ্ট মিথ্যা আউটপুট ( false, 0, no, ...)

উদাহরণ

5, 3, 4        --> yes
3, 5, 4        --> yes
12, 37, 35     --> yes
21, 38, 50     --> no
210, 308, 250  --> no

বিধি

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

1
আমরা কি নেতিবাচক মান বা অবৈধ প্রান্ত ট্রিপল হ্যান্ডেল করা উচিত?
ব্যবহারকারী 202729

2
খুব সম্পর্কিত । আমি এটিকে বাকী সম্প্রদায়কে ছেড়ে দেব এটি সিদ্ধান্ত নেওয়ার জন্য যে এটি কোনও বোবা।
ডিজিটাল ট্রমা

2
আমি মনে করি দৈর্ঘ্যের পরিবর্তে স্থানাঙ্কগুলি ব্যবহার করা চ্যালেঞ্জকে উল্লেখযোগ্যভাবে পরিবর্তন করে
লুই মেন্ডো

8
দৈর্ঘ্য সহ কোনও ত্রিভুজ নেই 21, 38, 5, কারণ 21 + 5 <38 । এটি কি একটি ইচ্ছাকৃত প্যাথলজিকাল কেস যা আমাদের পরিচালনা করতে হবে?
কেভিন 21

1
@ কেভিন না আপনার এই মামলাটি পরিচালনা করতে হবে না। ব্যবহারকারী 202729 ইতিমধ্যে এই প্রশ্নটি জিজ্ঞাসা করেছে :)
mdahmoune

উত্তর:


37

জেলি , 5 বাইট

²µSHe

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

প্রযুক্তিগত নোট: বাইটগুলি জেলি কোডেপে গণনা করা হয়।

ব্যাখ্যা:

²µSHe  Main link.
²      Square each number.
 µ     With the new list,
  S    calculate its sum,
   H   and halve it.
    e  Check if the result exists in the new list (squared input)

সমস্যা তিন নম্বর দেওয়া হচ্ছে সমতূল্য a, b, c, এবং যদি সেখানে একটি বিন্যাস যেমন যে জিজ্ঞাসা a² + b² = c²। এই কিনা সমতূল্য (a² + b² + c²) ÷ 2এক a², b² or c², তাই প্রোগ্রাম ঠিক চেক পারে।



1
কেবল একটি প্রযুক্তিগত নোট: ইউটিএফ -8 এ প্রতিটি চিহ্ন ²এবং µদুটি বাইটের দাম রয়েছে, সুতরাং আপনার
চার্লি 8

2
@ চার্লি উত্তর স্পষ্ট করার জন্য সম্পাদিত।
ব্যবহারকারী 202729

20

পাইথন 2 , 37 বাইট

a,b,c=sorted(input())
1/(a*a+b*b-c*c)

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

-2 ফ্লিপট্যাক ধন্যবাদ ।
-1 ক্রেগ গিডনি ধন্যবাদ ।

প্রস্থান কোডের মাধ্যমে আউটপুট ( 0= মিথ্যা, 1= সত্য)।


বাঃ। ঠিক একই উত্তর নিয়ে এসেছি। যে কোনও সংখ্যক পরীক্ষার ক্ষেত্রেও আপনি অনুমতি দিতে টেস্ট স্যুটটি সংশোধন করতে পারেন
mbomb007

@ mbomb007 হুমম্ম exec(code), এর exec (code)পরিবর্তে কেন exec code? : ডি ;
এরিক দি আউটগলফার

হাহাহা, এই উত্তরটি কীভাবে এক্স-এর সংক্ষিপ্ততরটির দ্বিগুণ? সম্ভবত লোকেরা এর মিষ্টি সরলতা পছন্দ করে
FlipTack

1
@ ফ্লিপট্যাক ¯_ (ツ) _ / ¯ (এছাড়াও xnor গুলি পাইথন 2 এ নেই)
এরিক দি আউটগল্ফার

পছন্দ করেছেন আমি এটি তৈরি করেছি যাতে এটি পাইথন 2 বা 3 এ কাজ করতে পারে
mbomb007

17

জাভা 8, 44 বাইট

(a,b,c)->(a*=a)+(b*=b)==(c*=c)|a+c==b|b+c==a

ব্যাখ্যা:

এখানে চেষ্টা করুন।

(a,b,c)->                // Method with three integer parameters and boolean return-type
  (a*=a)+(b*=b)==(c*=c)  //  Return if `a*a + b*b == c*c`
  |a+c==b                //  or `a*a + c*c == b*b`
  |b+c==a                //  or `b*b + c*c == a*a`
                         // End of method (implicit / single-line return-statement)

এটি প্যারেন্টেসিস ছাড়াই কাজ করে (c*=c)? এর *=উপর নির্ভুলতা থাকতে পারে ==এবং আপনি দুটি বাইট সংরক্ষণ করতে পারেন।
কর্সিকা 20

@ করসিকা আমি আশংকা করি যে এটি অন্যভাবে। ==অগ্রাধিকার আছে *==, +=, *=, এবং অনুরূপ বরাদ্দকরণ আসলে আছে জাভা অপারেটার মধ্যে এটা সর্বনিম্ন প্রাধান্য
কেভিন ক্রুইজসেন

আর কিছু সংক্ষিপ্ত খুঁজে পাচ্ছি না ... আমি aকোনও সাফল্য ছাড়াই (উদাহরণস্বরূপ) সর্বাধিক মান নির্ধারণের জন্য ভেরিয়েবলগুলি অদলবদল করার চেষ্টা করেছি । ঠিক আছে, আমি এটি করতে পারি, তবে প্রায় 65 টি চরিত্র ...
অলিভিয়ের

12

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

1 বাইট সংরক্ষণ করা হয়েছে এবং @ নীলকে ধন্যবাদ জানিয়ে একটি বাগ ফিক্স করেছেন

3 টি পূর্ণসংখ্যার অ্যারে হিসাবে ইনপুট নেয়। রিটার্নস trueজন্য ডান-কৌণিক এবং falseঅন্যথায়।

a=>a.some(n=>Math.hypot(...a,...a)==n*2)


আসল সংস্করণ, 44 বাইট

3 পূর্ণসংখ্যা হিসাবে ইনপুট নেয়। রিটার্নস 1জন্য ডান-কৌণিক এবং 0অন্যথায়।

(a,b,c)=>(a*=a)+(b*=b)==(c*=c)|a+c==b|b+c==a

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


দেখে মনে হচ্ছে আমরা ঠিক একই উত্তরটি নিয়ে এসেছি ( জাভাস্ক্রিপ্ট এবং জাভা 8 এর মধ্যে =>এবং ->পার্থক্য বাদে )। ;) আমার কাছ থেকে তাই স্পষ্ট।
কেভিন ক্রুইজসেন

>>1অনিরাপদ, এটি সত্য হিসাবে প্রত্যাশা করে [1, 1, 1]
নিল

2
কীভাবে Math.hypot(...a,...a)==n*2?
নিল

অত্যন্ত চমৎকার ফিক্স @Neil :)
Arnauld

2
@ নীল ~="রাগলি ইক্যুয়ালি" এর জন্য অপারেটর থাকতে হবে ;)
জলি জোকার


7

ত্রিভুজাকার , 57 বাইট

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

,$\:$:*/%*$"`=P:pp.0"*>/>-`:S!>/U+<U"g+..>p`S:U/U"p`!g<>/

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

এটি নিম্নলিখিত ত্রিভুজটিতে প্রসারিত হয়।

          ,
         $ \
        : $ :
       * / % *
      $ " ` = P
     : p p . 0 "
    * > / > - ` :
   S ! > / U + < U
  " g + . . > p ` S
 : U / U " p ` ! g <
> /

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

  • $:* প্রথম ইনপুটটি স্কোয়ার করুন।
  • $:* দ্বিতীয় ইনপুটটি স্কোয়ার করুন।
  • S":Ug! প্রথম মানটির চেয়ে দ্বিতীয় মান বেশি হলে পরীক্ষা করুন।
    • p"প্রথম সঙ্গে সত্য অদলবদল।
    • মিথ্যা p কিছু না।
  • $:* তৃতীয় ইনপুট স্কোয়ার করুন।
  • P":USg! তৃতীয় মানটি পূর্বের সর্বাধিকের চেয়ে বড় হলে পরীক্ষা করুন।
    • সত্যিকারের p+U- বর্তমান স্ট্যাকের যোগফল এবং সঞ্চিত তৃতীয় মানটি কেড়ে নেবে
    • মিথ্যা p"U+- যোগফল সর্বনিম্ন এবং সঞ্চিত তৃতীয় এবং সবচেয়ে বড় থেকে বিয়োগ করে
  • 0=% সমতা শূন্য এবং ফলাফল ফলাফল।

6

হাস্কেল ( 33 32 31 বাইট)

(\x->(sum x)/2`elem`x).map(^2)

মূল সংস্করণ:

(\x->2*maximum x==sum x).map(^2)

বেনামে ফাংশন। [A, b, c] আকারে একটি তালিকা নেয়। আউটপুটস সত্য বা মিথ্যা।

স্কোয়ারগুলির যোগফল সর্বোচ্চ বর্গের দ্বিগুণ কিনা তা প্রথম সংস্করণে পরীক্ষা করা হয়েছিল।

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

সম্পাদনা: দুর্ঘটনাক্রমে একটি নতুন লাইন গণনা করা হয়েছে, ধন্যবাদ এইচ.পি.উইজ


1
সাইটে স্বাগতম! এই উত্তরটি কেবলমাত্র 32 বাইট, সম্ভবত আপনি একটি অতিরিক্ত নিউলাইন গণনা করেছেন?
এইচ.পি.উইজ


এছাড়াও, চারপাশের বন্ধনীগুলি sumফেলে দেওয়া যেতে পারে। চমৎকার সমাধান!
গর্বিত হাসেল্লার

6

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

{(*²+*²==*²)(|.sort)}

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

*²+*²==*²এটি একটি বেনাম ফাংশন যা এর প্রথম দুটি আর্গুমেন্টের স্কোয়ারের যোগফল যদি তৃতীয় আর্গুমেন্টের বর্গের সমান হয় তবে এটি সত্য হয় returns আমরা এই ফাংশনে বাছাই করা ইনপুট তালিকাটি সাথে যুক্তি তালিকায় সমতল করি |


6

আর , 31 26 30 বাইট

cat(sum(a<-scan()^2)/max(a)==2)

আমি এটাকে বেশি পছন্দ করি না তবে এটি সংক্ষিপ্ত। স্কোয়ারগুলি যোগ করে এবং বৃহত্তম বর্গ দ্বারা বিভক্ত হয়। সত্যবাদী যদি 2।

পূর্ববর্তী সংস্করণ (বিড়ালের সাথে এবং @ গুইস্পের টিপ সহ সংশোধিত)

cat(!sort(scan())^2%*%c(1,1,-1))

সর্বশেষ আইটেমটি উপেক্ষিত করে বাছাই করা ইনপুটের যোগফলটি করুন এবং !না ফেরান ।

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


আপনার পূর্ববর্তী সংস্করণ জন্য, !sort(scan())^2%*%c(1,1,-1)27 বাইট হয়। কিন্তু আমি যদি এখনও প্রয়োজন মনে cat
জিউসেপ

চিয়ারস @ গুয়াস্পেপ, বিড়ালের কথা ভুলে গেছেন। আরপিএল এর চারপাশের নিয়মগুলি আমাকে বিরক্ত করে তবে তারা যা সেগুলি।
মিকিটি

@ জিউসেপ্পে ম্যাট্রিক্স গুণনের সাথে দুর্দান্ত টুইস্টও রয়েছে। আমি কখনই তা নিয়ে আসতে পারতাম না।
মিকিটি

6

ব্রেন-ফ্লাক , 68 বাইট

({({({})({}[()])}{}<>)<>})<>({<(({}){}<>[({})])>(){[()](<{}>)}{}<>})

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

ব্যবহারকারী 202729 এর উত্তরে পর্যবেক্ষণ ব্যবহার করে।

 {                      }      for each input number
   {({})({}[()])}{}            compute the square
  (                <>)<>       push onto second stack
(                        )     push sum of squares onto first stack
                          <>   move to second stack

 {                                    }    for each square
   (({}){}<>[({})])                        compute 2 * this square - sum of squares
  <                >(){[()](<{}>)}{}<>     evaluate loop iteration as 1 iff equal
(                                      )   push 1 if any squares matched, 0 otherwise

5

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

n(a,b,c){return(a*=a)+(b*=b)-(c*=c)&a+c-b&b+c-a;}

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

কেভিন ক্রুজসেন্স কৌশলটি উন্নত করে

বৈধ ত্রিভুজটির জন্য 0 এবং অন্যথায় শূন্য-না মান মান দেয়


3
পিপিসিজিতে আপনাকে স্বাগতম!
২৪ শে

আপনি কি বিটওয়াইজ অপারেশন ব্যবহার করছেন তা কি সর্বদা কার্যকর হয়?
l4m2


4

পাইথন 2 , 43 বাইট

lambda a,b,c:(a*a+b*b+c*c)/2in(a*a,b*b,c*c)

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

পাইথন 2 , 79 70 68 62 বাইট

lambda*l:any(A*A+B*B==C*C for A,B,C in zip(l,l[1:]+l,l[2:]+l))

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


পূর্ণসংখ্যার ইনপুট সীমাবদ্ধ করতে চ্যালেঞ্জটি আপডেট করা হয়েছিল।
মার্টিন এন্ডার


14
A*Aআরও খাটো ...
সকরাটিক ফিনিক্স

68 বাইটস tio.run/…
mdahmoune

@ এমদাহমৌনে 67 বাইট ; সত্য মানের অর্থগুলি উল্টানো এবং এর -পরিবর্তে ব্যবহার করা ==
জোনাথন ফ্রেচ

4

সি,  68  54 বাইট

ব্যবহারকারী 202729 এর সমাধান ব্যবহার করে ।

f(a,b,c){return!((a*=a)+(b*=b)-(c*=c)&&a-b+c&&a-b-c);}

14 বাইট গল্ফ করার জন্য ক্রিস্টফকে ধন্যবাদ!

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

সি, 85 বাইট

#define C(a,b,c)if(a*a+b*b==c*c)return 1;
f(a,b,c){C(a,b,c)C(b,c,a)C(c,a,b)return 0;}

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


যার 1পরামিতিগুলির আউটপুটগুলি 1, 1, 1ভুল ...
নিল

@ নীল এটি এখন ঠিক করা হয়েছে।
স্টেডিবক্স

প্রশ্নগুলি ইনটগুলি ব্যবহার করতে আপডেট করা হয়েছিল, সম্ভবত কিছু বাইট সংরক্ষণ করতে পারে।
কর্সিকা 20

f(a,b,c){a=!((a*=a)+(b*=b)-(c*=c)&&a-b+c&&a-b-c);}
ক্রিস্টোফ


4

জে, 10 বাইট

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

=`+/@\:~*:

মূল উত্তর

(+/@}:={:)@/:~*:

/:স্কোয়ারগুলি বাছাই করুন *:, তারপরে পরীক্ষা করুন যে প্রথম +/@}:দুটিয়ের যোগফল শেষের সমান কিনা{:

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


এটি ভয়াবহভাবে জঘন্য চালাক
জোনা

4

ত্রিভুজ্যতা ,  49  31 বাইট

...)...
..IEO..
.M)2s^.
}Re+=..

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

ব্যাখ্যা

প্রতিটি ত্রিভুজাকৃতি প্রোগ্রাম অবশ্যই একটি ত্রিভুজাকার প্যাডিং (শ্লেষ ক্ষমা)। এটি হ'ল, প্রোগ্রামের নীচ থেকে i ম লাইন গণনা অবশ্যই প্রতিটি পাশের আই - 1 ডট ( .) দিয়ে প্যাড করতে হবে । বিন্দু-ত্রিভুজগুলি প্রতিসম ও নান্দনিকভাবে সুখী রাখার জন্য, প্রতিটি লাইনে 2L - 1 টি অক্ষর থাকতে হবে, যেখানে এল প্রোগ্রামের লাইনের সংখ্যা। প্রয়োজনীয় প্যাডিংয়ের জন্য তৈরি করা অক্ষরগুলি সরিয়ে, কোডটি এখানে কীভাবে কাজ করে:

)IEOM)2s^}Re+=     Full program. Input: STDIN, Output: STDOUT, either 1 or 0.
)                  Pushes a zero onto the stack.
 IE                Evaluates the input at that index.
   O               Sorts the ToS (Top of the Stack).
    M)2s^}         Runs the block )2s^ on a separate stack, thus squaring each.
          R        Reverse.
           e       Dump the contents separately onto the stack.
            +      Add the top two items.
             =     Check if their sum is equal to the other entry on the stack (c^2).

ত্রিভুজাকারে ত্রিভুজটি সমকোণে রয়েছে কিনা তা পরীক্ষা করা হচ্ছে ...


3

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

$a,$b,$c=$args|sort;$a*$a+$b*$b-eq$c*$c

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

ইনপুট বাছাই করে, $a,$b,$cভেরিয়েবলগুলিতে স্টোর করে । তারপরে পাইথাগোরিয়ান উপপাদ ব্যবহার করে কিনা তা পরীক্ষা করে দেখুন a*a + b*b = c*c। আউটপুট হয় হয় বুলিয়ান Trueবা False


3

জাভাস্ক্রিপ্ট 34 বাইট (ডি = ছাড়াই)

D=(d,[a,b,c]=d.sort())=>a*a+b*b==c*c

console.log(D([5, 3, 4       ])== true)
console.log(D([3, 5, 4       ])== true)
console.log(D([12, 37, 35    ])== true)
console.log(D([21, 38, 5     ])== false)
console.log(D([210, 308, 15  ])== false)


আমি 34 a=>a.sort()[0]**2+a[1]**2==a[2]**2এ ইএস 6 তে একই উত্তর পেয়েছিলাম । তাই আপনাকে ডানিয়েলআইডি
ওয়ালিওয়েস্ট

1
দুর্ভাগ্যক্রমে, sort()কোনও কলব্যাক সরবরাহ না করা হলে শব্দকোষের ক্রমটি ব্যবহার করে, উদাহরণস্বরূপ এই কোডটি ব্যর্থ করে তোলে [10,6,8]
আর্নল্ড

3

আরপিগ্রোএন 2 , 10 বাইট

§²2^r]‘\+e

ব্যাখ্যা

§²2^r]‘\+e
§           # Sort the input list
 ²2^r       # Square each element in the list.
     ]      # Duplicate it on the reg stack.
      ‘     # Pop the top (largest) element off it
       \+   # Swap it, sum the rest of the list.
         e  # Are they equal?

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


তালিকার নকল কেন?
mdahmoune

@mdahmoune RProgN2 কোনও উপাদানটি পপিংয়ের সময় মূল তালিকাটি স্ট্যাকের উপরে রাখে না, তবে স্ট্যাকগুলি রেফারেন্স অনুসারে থাকে, সুতরাং স্ট্যাকটিকে এর যোগফলটি করার জন্য এটি প্রথমে নকল করা দরকার।
এটাকো

থ্যাঙ্কস
আপভোট

3

র‌্যাকেট , 64 60 বাইট

(λ(a b c)(=(+(* a a)(* b b)(* c c))(*(expt(max a b c)2)2)))

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

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

টেস্ট যদি a^2 + b^2 + c^2হয় দুইবার বৃহত্তম করার সমান a^2, b^2এবং c^2

রিটার্নস #tঅধিকার ত্রিভুজ এবং #fঅন্য সব ইনপুট জন্য।


  • -4 বাইট ব্যবহার করার জন্য @ এক্সনোরের পরামর্শকে ধন্যবাদ expt

দুর্দান্ত;) তবে আমি মনে করি (define funঅবশ্যই কোডের একটি অংশ হতে হবে ...
mdahmoune

ধন্যবাদ! আমি মনে করি এটি প্রচলিত আছে যে খাঁটি ফাংশনগুলিকে উত্তর হিসাবে অনুমোদিত। (define fun ...)Tio শুধু সুবিধার জন্য: আমরা সমানভাবে পাশাপাশি এই ফাংশন ব্যবহার করতে পারে (... 3 4 5)যেখানে ...ফাংশন। (সুতরাং আপনি যদি চান তবে আমাদের একটি শিরোনাম (print (এবং পাদচরণ থাকতে পারে 3 4 5))))
মিশা ল্যাভরভ

(কিন্তু এটা আমার প্রথম কোলাহল জমা অন্যতম, তাই আমি কি কোলাহল-নির্দিষ্ট নিয়মাবলী আছে, যদি থাকে খুব স্পষ্ট নই কোলাহল ব্যবহার কারো কারো অতীতের সমাধান অন্তর্ভুক্ত করেছেন। #lang racketকোডে; কিছু করোনি।)
মিশা লাভরভ

1
র‌্যাকেটটি এতটাই স্পষ্ট যে এটি (max a b c)একটি letবাঁধাইয়ের চেয়ে পুনরাবৃত্তি করা কম , হু? আমি মনে করি না এটি একটি যুক্তি হিসাবে বাঁধাই সংক্ষিপ্ত হবে λ? বা, সেখানে কোনও ক্ষতিকারক অন্তর্নির্মিত নেই?
xnor

2
@ মিশালাভ্রভ তারপরে কীভাবে (*(expt(max a b c)2)2)?
xnor

3

প্রথম উদাহরণটি সনাক্ত করতে ব্যর্থ [1,1,1] একটি বৈধ ইনপুট নয় (কিছু অন্যান্য প্রচেষ্টার সাধারণ সমস্যা), তবে দ্বিতীয়টি ঠিক কাজ করে।
নিক লফলিন

@ নিকলফলিন ওফস, প্রথম উদাহরণ সরানো হয়েছে
Okx

আপনি n{RÆ_একটি বাইট সংরক্ষণ করতে পারেন ।
এমিগানা

3

রুবি, 31 বাইট

->a{a,b,c=*a.sort;a*a+b*b==c*c}

3 পূর্ণসংখ্যার তালিকা হিসাবে ইনপুট নেয়। অন্যান্য সমাধান থেকে কিছু ধারণা ব্যবহার করে।


আমি সবেমাত্র অনুধাবন করেছি যে আমি সবে পোস্ট করেছি উত্তরটি আপনার প্রায় অনুরূপ। আমি প্রতিশ্রুতি দিয়েছি যে আমি আপনার অনুলিপি করিনি (আসলে এটি "একটি উত্তর পোস্ট করুন" বাক্সে কিছুক্ষণ বসে ছিল) তবে যেহেতু আপনাকে প্রথমে জমা দেওয়া হয়েছিল, যদি আপনি মনে করেন আমার খুব কাছাকাছি, আমি এটি মুছে ফেলব।
iamnotmaynard

@ iamnotmaynard এটি প্রায় একই জিনিস। এটি একটি মজার কাকতালীয় LOL ছিল। আমাকে জানাতে ধন্যবাদ
dkudriavtsev

যদি সম্ভব হয় তবে দয়া করে একটি অনলাইন পরীক্ষার পরিবেশের একটি লিঙ্ক অন্তর্ভুক্ত করুন যাতে অন্য লোকেরা আপনার কোডটি চেষ্টা করে দেখতে পারে!
mdahmoune

3

জুলিয়া 0.6 , 16 বাইট

!x=xx2x.*x

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

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

যাক এক্স = [A, B, C]

x⋅xএর ডট পণ্য এক্স তাই এটি উৎপাদ, এবং নিজেই a² + + b² + + c²

2x.*x2x এবং x এর উপাদান অনুসারে পণ্য , তাই এটির ফলন হয় [2a², 2b², 2c²]

পরিশেষে, পরীক্ষাগুলি যদি +² + বি + সি² ভেক্টরের [2a², 2b², 2c²] এর সাথে সম্পর্কিত হয় তবে পরীক্ষা করা হয় , যা সত্য iff
a² + b² + c² = 2a² বা a² + b² + c² = 2b² বা a² + b² + c² = 2c² , যা নিজেই সত্য iff
b² + + c² = a² বা a² + + c² = b² বা a² + + b² = c²


3

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

a->{java.util.Arrays.sort(a);return a[0]*a[0]+a[1]*a[1]==a[2]*a[2];}

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


আপনি কি অ্যারের পরিবর্তে কারিং ব্যবহার করে কিছু বাইট সংরক্ষণ করতে পারেন?
অ্যাডমবর্কবার্ক

1
@ অ্যাডমবার্কবার্ক নাপ, কারণ sortএকটি অ্যারে লাগে।
অলিভিয়ার

3

টিআই-বেসিক, 13 11 10 বাইট

max(Ans=R►Pr(min(Ans),median(Ans

এখন যে কোনও ক্রমে ইনপুটগুলির জন্য কাজ করে এবং এটিও খাটো। @ মিশা লাভরভকে আরও একটি ধন্যবাদ


যদি সম্ভব হয় তবে দয়া করে একটি অনলাইন পরীক্ষার পরিবেশের একটি লিঙ্ক অন্তর্ভুক্ত করুন যাতে অন্য লোকেরা আপনার কোডটি চেষ্টা করে দেখতে পারে!
mdahmoune

এটি কেবলমাত্র ডিটেক্ট করে ডান ত্রিভুজ সাজানো: ইনপুটের A=5, B=4, C=3সঠিকভাবে পরিচালনা করা হবে না।
মিশা লাভরভ

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

যদি আমরা কোনও একক ছেড়ে চলে যাই )তবে max(Ans=R►Pr(min(Ans),median(Ansএটিও বৈধ হবে (যদিও আমরা এখানে গণনা করছি তা আলাদা) এবং এটি একটি বাইট সংক্ষিপ্ত।
মিশা লাভরভ

@ মিশালাভরভ এটি আকর্ষণীয়, আমি আপনার বক্তব্যটি দেখতে চাই। আমি অভিব্যক্তিগুলি সমস্ত অ-নেতিবাচক ইনপুটগুলির সমতুল্য বলে মনে করি।
টিমটেক

3

সিজেম, ৯

q~$W%~mh=

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

ব্যাখ্যা:

q~      read and evaluate the input (given as an array)
$W%     sort and reverse the array
~       dump the array on the stack
mh      get the hypotenuse of a right triangle with the given 2 short sides
=       compare with the longer side

কিছু ব্যাখ্যা;)?
mdahmoune

@ এমদাহমৌনে আপনি এখানে যান
অদিতসু

ধূর. আপনি কি সেই ভাষা লেখেন নি? ফর্সা মনে হচ্ছে না। (রসিকতা)
কেইন

3

পরী / জিপি , 29 24 বাইট

f(v)=v~==2*vecmax(v)^2

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

থেকে স্পষ্ট পরিবর্তন দ্বারা পাঁচটি বাইট সংরক্ষণ norml2(v)করা v*v~

অন্যান্য উত্তর দ্বারা অনুপ্রাণিত।

এখানে vঅবশ্যই তিনটি স্থানাঙ্ক সহ একটি সারি ভেক্টর বা কলাম ভেক্টর থাকতে হবে ।

ব্যবহারের উদাহরণ: f([3,4,5])

অবশ্যই, আপনি নিখরচায় যৌক্তিক দিকের দৈর্ঘ্য পান, উদাহরণস্বরূপ f([29/6, 10/3, 7/2])

আমি যদি f(v)=অংশটি গণনা না করি তবে তা 19 বাইট। প্রথম অংশটিও লেখা যেতে পারে v->(মোট 22 বাইট)।

ব্যাখ্যা: তিন স্থানাঙ্ক যদি vহয় x, yএবং zতারপর, গুণফল vএবং তার TRANSPOSE v~স্কেলের দেয় x^2+y^2+^z^2, এবং আমরা যে যদি স্থানাঙ্ক সর্বোচ্চ দ্বিগুণ বর্গ সমান চেক করতে হবে x, y, z

অতিরিক্ত: পাইপাগোরিয়ান চতুর্ভুজগুলিরf জন্য একই পরীক্ষাগুলি যদি আপনার ইনপুট ভেক্টরটির চারটি স্থানাঙ্ক থাকে, ইত্যাদি।


যদি সম্ভব হয় তবে দয়া করে একটি অনলাইন পরীক্ষার পরিবেশের একটি লিঙ্ক অন্তর্ভুক্ত করুন যাতে অন্য লোকেরা আপনার কোডটি চেষ্টা করে দেখতে পারে!
mdahmoune

@ mdahmoune আপনি এই tio.runলিঙ্কটি ব্যবহার করতে পারেন । তবে স্থানীয়ভাবে কেবল প্যারি / জিপি ইনস্টল করা অনেক সুন্দর ।
জেপ্পে স্টিগ

3

এমএস এক্সেল, 49 বাইট

বেনামে ওয়ার্কশিট ফাংশন যা [A1: C1] সীমা থেকে ইনপুট নেয় এবং কলিং সেলটিতে আউটপুট নেয়।

=OR(A1^2+B1^2=C1^2,B1^2+C1^2=A1^2,A1^2+C1^2=B1^2)

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