কোডে মিরর, মিরর

Question

দ্বি-মাত্রিক প্রোগ্রামিং ভাষা প্রায়ই মিরর কমান্ড মত আছে /এবং \গ্রিড উপর নির্দেশ পয়েন্টার পুনর্নির্দেশ করতে:

>>>>\
    v
    v
<<<</

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

বিধি

ইনকামিং দিক অক্ষর এক হিসাবে দেওয়া হবে NESWএবং আয়না পারেন হিসাবে দেওয়া হবে /বা \। আপনি যে কোনও ক্রমে এগুলি পেতে পারেন। আপনাকে অবশ্যই বড় হাতের অক্ষর ব্যবহার করতে হবে।

আপনি কোনও দ্বি-চরিত্রের স্ট্রিং, অক্ষরের মধ্যে কিছু বিভাজক ব্যবহার করে একটি স্ট্রিং, তালিকার একটি অক্ষরের জুড়ি বা এমনকি সিঙ্গলটন স্ট্রিংয়ের একটি জোড়া সহ যে কোনও সুবিধাজনক বিন্যাসে ইনপুট নিতে পারেন। যদি আপনি বিভাজক সহ একটি স্ট্রিং ব্যবহার করেন তবে বিভাজক কোনও অক্ষর ব্যবহার করতে পারবেন না NWSE\/।

আউটপুটটি NESWএকক-অক্ষরযুক্ত স্ট্রিং থেকে একটি অক্ষর হওয়া উচিত ।

আপনি কোনও প্রোগ্রাম বা একটি ফাংশন লিখতে পারেন এবং ইনপুট গ্রহণ এবং আউটপুট সরবরাহের আমাদের মানক পদ্ধতির কোনওটি ব্যবহার করতে পারেন ।

আপনি যে কোনও প্রোগ্রামিং ভাষা ব্যবহার করতে পারেন , তবে লক্ষ্য করুন যে এই ফাঁকগুলি ডিফল্টরূপে নিষিদ্ধ করা হয়েছে।

এটি কোড-গল্ফ , তাই সংক্ষিপ্ততম বৈধ উত্তর - বাইটগুলিতে মাপা - জয় w

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

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

N /   -->   W
N \   -->   E
E /   -->   S
E \   -->   N
S /   -->   E
S \   -->   W
W /   -->   N
W \   -->   S

Comments

যে ভাষাগুলিতে ব্যাকস্ল্যাশগুলি অবশ্যই ইনপুটটিতে পালাতে হবে, সেখানে কি অনুমান করা যায় যে উপযুক্ত যেখানে উপযুক্ত "\\" হবে?

— জেডিএল

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

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

ঠিক আছে, আমি যখন স্টিডিনের মাধ্যমে অবিচ্ছিন্ন "\" প্রবেশ করানো হয়েছিল তখন আর সমস্যা হবে বলে আমি প্রত্যাশা করছিলাম readline()।

— জেডিএল

@ জেডিএল আপনার সম্ভবত স্ট্রিংটি প্রবেশের (ডুপ্লিকেট করা) প্রতীকটি প্রবেশ করতে হবে , তবে ফলাফলটি স্ট্রিংটি "এন \" হবে

— লুইস মেন্ডো

Answer 1

পাইথন, 40 38 বাইট

-২ বাইটস @ মিচশওয়ার্টজ (ord(d)+ord(m))%8-> কে ধন্যবাদord(d)+ord(m)&7

lambda d,m:' NESSWNW'[ord(d)+ord(m)&7]

অর্ডিনালগুলির যোগফলের যোগফলের ক্ষুদ্রতম মোড দ্বারা সূচিত একটি তালিকার উত্তরে (একে একে স্ট্রিং) উত্তরের সন্ধান।

পরীক্ষার মামলাগুলি আদর্শে রয়েছে

Comments

ডাঙ্গিত, আমি ভেবেছিলাম যে আমি ASCII মানগুলি গ্রহণ করে, সেগুলি, %8তাদের সংমিশ্রিত করে, এবং একটি সূচক তৈরি করেছিলাম খুব চালাক । তারপরে আমি দেখতে পাচ্ছি আপনি এক ঘন্টা আগে একই সমাধান পোস্ট করেছেন। Hah। একটি +1 আছে।

— অ্যাডমবর্কবার্ক

Answer 2

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

lambda c,m,k="NWES":k[k.find(c)^(m>k)+1]

Sp3000 একটি বাইট ( .index→ .find) সংরক্ষণ করেছে।

ব্যাখ্যা

আমরা এর মতো দিকনির্দেশগুলি মানচিত্র করতে চাই:

       \
  N ⇄⇄⇄⇄⇄⇄⇄ E
  ⇅         ⇅
  ⇅         ⇅
/ ⇅         ⇅ /
  ⇅         ⇅
  ⇅         ⇅
  W ⇄⇄⇄⇄⇄⇄⇄ S
       \

আমরা দিকনির্দেশগুলিকে 2-বিট কোডগুলি বরাদ্দ করতে পারি এবং প্রথম এবং দ্বিতীয় বিটগুলিকে XOR-ing হিসাবে উভয় ফ্লিপ দেখতে পারি:

         xor 2
     0 0 ⇄⇄⇄⇄⇄ 1 0
      ⇅         ⇅
      ⇅         ⇅
xor 1 ⇅         ⇅ xor 1
      ⇅         ⇅
      ⇅         ⇅
     0 1 ⇄⇄⇄⇄⇄ 1 1
         xor 2

বিট স্ট্রিং এবং দিকনির্দেশের মধ্যে ম্যাপিংটি স্ট্রিং ব্যবহার করে ঘটে k। এখন আমাদের কেবল মিরর অক্ষর '/'এবং '\\'মানগুলি 1এবং মানচিত্র তৈরি করতে হবে 2। যেহেতু '/' < '\\', আমরা নির্লিপ্তভাবে (m>'/')+1একটি সূত্র হিসাবে ব্যবহার করতে পারি । কিন্তু অপেক্ষা করো! Lexicographically,

'/' < 'NWES' < '\\'

এবং আমরা 'NWES'সুন্দরভাবে নিয়োগ করা হয়েছে k! সুতরাং আমরা (m>k)+1পরিবর্তে ব্যবহার করতে পারেন ।

Answer 3

সিজেম, 14 বাইট

(@ মার্টিনএেন্ডার আমার পাইথন উত্তরটি পোর্ট করেছেন )

l1b" NESSWNW"=

কিভাবে?

l1b" NESSWNW"= -
l              - read input
 1b            - cast characters as base 1 digits
   " NESSWNW"  - the string " NESSWNW"
             = - modulo index into the string

টেস্টগুলি অ্যাডিটসুতে রয়েছে

Answer 4

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

d=>m=>(S="NWES")[S.search(d)^-~(m>S)]

লিনের উত্তরের জন্য তুলনা করে আরও 3 টি বাইট সংরক্ষণ করা হয়েছে

ব্যবহার

let f =
d=>m=>(S="NWES")[S.search(d)^-~(m>S)]

console.log(f("N")("/"));  //   -->   W
console.log(f("N")("\\")); //   -->   E
console.log(f("E")("/"));  //   -->   S
console.log(f("E")("\\")); //   -->   N
console.log(f("S")("/"));  //   -->   E
console.log(f("S")("\\")); //   -->   W
console.log(f("W")("/"));  //   -->   N
console.log(f("W")("\\")); //   -->   S

Comments

আপনার অবস্থা খেলে শেষে আপনার অবস্থাটি পাওয়ার জন্য ASCII তুলনাগুলির চালাক ব্যবহার ...

— ওয়ালিওয়েস্ট

Answer 5

এমএটিএল , 19 17 বাইট

'NWSE'jy&mjy+Eq-)

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

ব্যাখ্যা

'NWSE'    % Push this string
j         % Take first input, say 'W'. Stack contains: 'NWSE', 'W'
y         % Duplicate from below. Stack: 'NWSE', 'W', 'NWSE'
&m        % Index of membership. Stack: 'NWSE', 2
j         % Take second input, say '/'. Stack: 'NWSE', 2, '/'
y         % Duplicate from below. Stack: 'NWSE', 2, '/', 2
+         % Add (char '/' is converted to code point). Stack: 'NWSE', 2, 49 
Eq        % Multiply by 2, subtract 1. Stack: 'NWSE', 2, 97
-         % Subtract. Stack: 'NWSE', -95
)         % Apply -95 as (modular, 1-based) index into 'NWSE'. Stack: 'N'
          % Implicitly display

Answer 6

পাইথ, 17 16 15 বাইট

প্রত্যেকটি -1 বাইটের জন্য @ জাকুব এবং @ মাল্টেসেনকে ধন্যবাদ

@J"NWES"xxJQh>E

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

এটি @ লিনের পাইথন উত্তরের একটি বন্দর ।

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

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

@J"NWES"xxJQh>E  Program. Inputs: Q, E
 J"NWES"         J="NWES". Yield J
         xJQ     J.index(Q)
             >E  E>Q, lexographically (implicit input fill)
            h    +1
        x        Bitwise XOR of the above two
@                Index into J with the above
                 Implicitly print

Comments

আপনি প্রতিস্থাপন দ্বারা অন্য বাইট সংরক্ষণ করতে পারবেন <QEসঙ্গে >E।

— মাল্টেসেন

Answer 7

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

‘€Ã‘DIkI'/kÌ^è

‘€Ã‘             # from string "NEWS"
             è   # get element at index
    DIk          # index of 1st input in string "NEWS"
            ^    # XOR
       I'/k      # index of 2nd input in string "/"
           Ì     # +2               

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

Answer 8

জেলি , 14 13 12 বাইট

(আমার পাইথনের উত্তরের একটি বন্দর ) -
@ মার্টিনএেন্ডারকে ধন্যবাদ -1 (স্ট্রিংটির শেষের জন্য একটি স্থান যুক্ত করুন এবং মডিউল 8 এর প্রয়োজনীয়তা অপসারণ করুন)
-১ লুইসেমেন্ডোকে -1 বাইট ধন্যবাদ (দু'এর পরিবর্তে একটি স্ট্রিং যুক্তি নিন)

OSị“NESSWNW 

কিভাবে?

OSị“NESSWNW  - takes a single argument "dm" (direction and mirror), in either order.
                   strings and lists are equivalent in Jelly
 O            - ordinal: [ord(d),ord(m)]
  S           - sum: ord(d)+ord(m)
    “NESSWNW  - string: "NESSWNW "
   ị          - fetch modulo index (the string is 8 long and 1-based)

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

Answer 9

জাভা 7, 71 70 68 বাইট

char c(int d,int m){return"NEWS".charAt("NEWS".indexOf(d)^-~(m%2));}

খুব খারাপ charAtএবং indexOfএত বেশি বাইট নেয় ..

অবহেলিত এবং সমস্ত পরীক্ষার কেস:

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

class M{
  static char c(int d, int m) {
    return "NEWS".charAt("NEWS".indexOf(d) ^ -~(m%2));
  }

  public static void main(String[] a){
    System.out.print(c('N', '/') + " ");
    System.out.print(c('N', '\\') + " ");
    System.out.print(c('E', '/') + " ");
    System.out.print(c('E', '\\') + " ");
    System.out.print(c('S', '/') + " ");
    System.out.print(c('S', '\\') + " ");
    System.out.print(c('W', '/') + " ");
    System.out.print(c('W', '\\') + " ");
  }
}

আউটপুট:

W E S N E W N S

Answer 10

পাইথন, 63 61 59 বাইট

lambda d,m,x='NESW'*2:x[x.find(d)+2*(m=='/\\'[d in'NS'])-1]

বেশ সহজ. অবশ্যই আরও গল্ফ করা যেতে পারে। ইনপুট ইনডেক্সে 1 বা -1 যুক্ত করতে হবে কিনা তা স্থির করে 'NESW'।

এটি ল্যাম্বডা এক্সপ্রেশন; এটি ব্যবহার করতে, এটির সাথে উপসর্গ করুন f=।

আইডিয়ন!

Answer 11

জাভা 8, 62 58 56 বাইট

(d,m)->"SEWN".charAt("NWES".indexOf(d)^m.indexOf(47)+2);

অসম্পূর্ণ পরীক্ষা প্রোগ্রাম

import java.util.function.BiFunction;

public class Mirror {

public static void main(String[] args) {
    BiFunction<String, String, Character> function = (d,m)->"SEWN".charAt("NWES".indexOf(d)^m.indexOf(47)+2);

    System.out.println(function.apply("N", "/")); //W
    System.out.println(function.apply("N", "\\")); //E
    System.out.println(function.apply("W", "/")); //N
    System.out.println(function.apply("W", "\\")); //S
    System.out.println(function.apply("E", "/")); //S
    System.out.println(function.apply("E", "\\")); //N
    System.out.println(function.apply("S", "/")); //E
    System.out.println(function.apply("S", "\\")); //W
}

}

Answer 12

পাওয়ারশেল ভি 2 + 34 বাইট

param($a,$b)"xNESSWNW"[(+$a+$b)%8]

দুটি সুস্পষ্ট হিসাবে ইনপুট নেয় char, আউটপুট ক char।

এই কাজ নিম্নরূপ: যদি আমরা সাজানোর আউটপুট, আমরা চাই S /একরকম হিসাবে একই সমান N \, W /সমান E \, ইত্যাদি অথবা, অন্তত উত্পাদন সংখ্যার যে "ঘনিষ্ঠ যথেষ্ট" এখনও এখনো স্বতন্ত্র। যদি আমরা এএসসিআইআই মানগুলি লক্ষ্য করি তবে আমরা নীচের মতো একটি টেবিল পাই:

In1   In2       Res.    Sum
S 83  / 47  --> E 69 -> 130
N 78  \ 92  --> E 69 -> 170
W 87  / 47  --> N 78 -> 134
E 69  \ 92  --> N 78 -> 161
W 87  \ 92  --> S 83 -> 179
E 69  / 47  --> S 83 -> 116
N 78  / 47  --> W 87 -> 125
S 83  \ 92  --> W 87 -> 175

সংক্ষেপণ কলামে (ইনপুটগুলির ASCII কোড পয়েন্টগুলি সংক্ষিপ্তকরণ থেকে প্রাপ্ত) একটি দ্রুত ব্রুট-ফোরার চালানো দেখায় যে আমরা যদি অঙ্কের মডুলো গ্রহণ করি তবে আমরা 8নিম্নলিখিতটি পাই 2 2 | 6 1 | 3 4 | 5 7। যে স্ট্রিং প্রমাণ হচ্ছে "xNESSWNW", যেমন Eসূচিতে হয় 2, Nএ 6এবং 1, ইত্যাদি।

সুতরাং, আমরা শুধু কেনে (পরোক্ষভাবে থেকে কাস্ট করা যোগফল প্রয়োজন charথেকে int32পথ ধরে), যে নিতে %8, এবং ব্যবহার আমাদের স্ট্রিং মধ্যে সূচক।

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

PS C:\Tools\Scripts\golfing> ('N','/'),('N','\'),('E','/'),('E','\'),('S','/'),('S','\'),('W','/'),('W','\')|%{"$($_[0]) $($_[1]) --> "+(.\mirror-mirror-in-the-code.ps1 ([char]$_[0]) ([char]$_[1]))}
N / --> W
N \ --> E
E / --> S
E \ --> N
S / --> E
S \ --> W
W / --> N
W \ --> S

Answer 13

ব্যাচ, 111 বাইট

:goto %1
:W/
:E\
@echo N
@exit/b
:S/
:N\
@echo E
@exit/b
:E/
:W\
@echo S
@exit/b
:N/
:S\
@echo W

W/যেমন একটি দ্বি-চরিত্রের স্ট্রিং কমান্ড লাইন প্যারামিটার হিসাবে গ্রহণ করে । \এবং /বিশ্রী লুপিং করা; এটি 124 বাইট লাগত।

Comments

ইড্ক, আমি 96 বাইট গণনা করি। আপনি \rএটি থেকে ফেলা হয়েছে?

— কনার ও'ব্রায়েন

@ কনরও ব্রায়েন আমি নোটপ্যাড ব্যবহার করে আমার ব্যাচের ফাইলগুলি লিখি, তাই না।

— নিল

Answer 14

অক্টোটা, 30 বাইট

জোনাথন অ্যালান হিসাবে একই আর্গুমেন্ট ব্যবহার করেছেন।

ইনপুটটিকে দ্বি-চরিত্রের স্ট্রিং হিসাবে নেয় 'W\'।

@(x)['NESSWNW'](mod(sum(x),8))

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

Comments

নিস! আপনি এমএটিএল পোর্ট করতে চাইতে পারেন: 'NESSWNW 'is)( সমস্ত পরীক্ষার কেস দেখুন )। iহয় input, sহয় sumএবং )সূচক হয়, যা মডুলার। আমি স্ট্রিংয়ে একটি স্পেস যুক্ত করেছি যাতে মডুলোটি 8

— লুইস মেন্ডো

ধন্যবাদ :) আমি এটিকে পৃথক উত্তর হিসাবে যুক্ত করলে আমি প্রতারণা বোধ করছি, যেহেতু আমি নিজে এটি লিখে নেই। আমি এই উত্তরে এটি যুক্ত করতে পারি যদিও আপনি নিজের উত্তরটি না দিতে চাইলে :)

— স্টিভি গ্রিফিন

আমি বুঝতে পেরেছি, আমি সম্ভবত এটিও করব :-) আমি আমার উত্তরটি পরিবর্তন করতে চাই না, কারণ এটি সম্পূর্ণ ভিন্ন পদ্ধতির সাথে আমি আসিনি। নিশ্চিত নয় যে এটি আপনার উত্তরে যুক্ত করা অর্থবোধ করে, যদিও এটি উত্তরের দুটি ভিন্ন ভাষা হবে

— লুইস মেন্ডো

যদিও এটি আমার প্রথম এমএটিএল উত্তর হবে: পিআই দেখতে পাবে যে এটি আপনার এমএটিএল উত্তরের চেয়ে দীর্ঘ, সুতরাং আমি মনে করি না যে আমি এটি যুক্ত করব ...

— স্টিভি গ্রিফিন

Answer 15

সি, 44, 35, 34 বাইট

f(a,b){return"NWES"[a&a/2&3^b&3];}

এটিতে দুটি ভেরিয়েবল হিসাবে দুটি অক্ষর প্রয়োজন। এটি নিম্ন এবং উপরের উভয় ক্ষেত্রে লাগে। এটি বিট ম্যানিপুলেশন ব্যবহার করে। খণ্ডের a&a/2ফলে এমন একটি মানের ফলাফল হয় যা নীচে দুটি বিটের জন্য অনন্য মান রয়েছে, &3সমস্ত উচ্চ বিট কেটে দেয়। এটি আয়নাটির জন্য "NWES" স্ট্রিংয়ের সূচক হিসাবে ব্যবহৃত \। সৌভাগ্য যে, ASCII অক্ষর নিচের দুই বিট \এবং /00 ও 11 যথাক্রমে, যা উপরোক্ত সূচির জন্য সঠিক দিক পেতে সঙ্গে XOR যাও নিখুঁত হয় /আয়না।

Comments

নিস! আপনি একটি স্পষ্ট -1 বাইট মিস করেছেন, যদিও: return"NWES"[...](স্থান বাদ দিন)।

— টিম Čas

ধন্যবাদ টিম, এটি আমার কাছে

— ঘটেনি

Answer 16

সিজেম , 17 বাইট

r"SWEN"_e!r'/#=er

ইনপুট স্থান দ্বারা পৃথক করা হয়।

এটি অনলাইন চেষ্টা করুন! (লাইনফিড-বিচ্ছিন্ন পরীক্ষার স্যুট হিসাবে))

চ্যালেঞ্জ পোস্ট করার আগে এটিই আমি সমাধান পেয়েছি। জোনাথনের সাইক্লিক ইনডেক্সিংয়ের মতো সংক্ষিপ্ত নয়, তবে আমি ভেবেছিলাম এই পদ্ধতিটি বেশ আকর্ষণীয় (এবং উপন্যাস)।

ব্যাখ্যা

লক্ষ্যটি হ'ল আউটপুট অক্ষরের সাথে ইনপুট অক্ষরটি প্রতিস্থাপন করতে ট্রান্সলিটেশন (অর্থাত্ একটি অক্ষর থেকে অক্ষর ম্যাপিং ব্যবহার করে) ব্যবহার করা হয়। এই কাজের জন্য, আমরা কিনা আয়না উপর ভিত্তি করে সঠিক মানচিত্র নির্বাচন করতে হবে /বা \। আমরা SWENতালিকা থেকে অন্যটিতে মানচিত্র করব যা আমরা শর্তাধীন নির্বাচন করব। যদি ইনপুট তালিকাটি থাকে SWENতবে দুটি আউটপুট মানচিত্রের নিম্নলিখিত হওয়া দরকার:

in  SWEN
/   ENSW
\   WSNE

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

r       e# Read incoming direction.
"SWEN"  e# Push input list for transliteration.
_e!     e# Duplicate and get all permutations. The way, `e!` is implemented, it
        e# always gives the permutations in sort order, regardless of the order
        e# of the input set. Specifically that means that "ENSW" will be first
        e# and "WSNE" will be last in this list.
r       e# Read the mirror.
'/#     e# Find the index of / in this string. If the mirror is '/', then this
        e# gives 0. Otherwise, this gives -1, indicating that '/' was not found.
=       e# Select the corresponding permutation. Indexing is zero-based and
        e# cyclic so that 0 (input '/') gives the first permutation "ENSW" and
        e# -1 (input '\') gives the last permutation "WSNE".
er      e# Perform the transliteration on the incoming direction.
        e# Printing is implicit.

Answer 17

SED 48 (42 -1 for -r) 43

মার্টিন ইন্ডারকে 5 টি সংরক্ষণ করা হয়েছে thanks

s,N/|S\\,W,;s,E/|W\\,S,;s,N.|S/,E,;s,..,N,

দুটি অক্ষরের স্ট্রিং হিসাবে ইনপুট নেয়।

Answer 18

গণিত, 98 বাইট

If[#2=="/",{"S",,,,,,,,,"W",,,,,"E",,,,"N"},{"N",,,,,,,,,"E",,,,,"W",,,,"S"}][[LetterNumber@#-4]]&

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

Answer 19

সি, 81 বাইট

f(char*a){return a!="N/"&a!="S\\"?a!="N\\"&a!="S/"?a!="W\\"&a!="E/"?78:83:69:87;}

ব্যবহার

main()
{
    printf("N/ \t %c\n",f("N/"));
    printf("N\\\t %c\n",f("N\\"));
    printf("E/ \t %c\n",f("E/"));
    printf("E\\\t %c\n",f("E\\"));
    printf("S/ \t %c\n",f("S/"));
    printf("S\\\t %c\n",f("S\\"));
    printf("W/ \t %c\n",f("W/"));
    printf("W\\\t %c\n",f("W\\"));
}

আউটপুট:

N/      : W  
N\      : E  
E/      : S  
E\      : N  
S/      : E  
S\      : W  
W/      : N  
W\      : S  

Comments

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

— সামি কুহোমেনেন

Answer 20

পাইথ, 13 বাইট

@."EW¹0`Y"sCM    

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

কোড পয়েন্টস, মডুলার ইনডেক্স, সংক্ষেপিত স্ট্রিংয়ের যোগফল।

Answer 21

টিআই-বেসিক, 40 বাইট

ইনপুটগুলি হার্ডকোডগুলি। বিরক্তিকর, তবে সবচেয়ে ছোট উপায়।

sub("NEWS",1+int(inString("E/W\N\S/N/S\E\W/",Ans)/4),1