সঠিক পথটি সন্ধান করুন

Question

পাথের একটি তালিকা দেওয়া হয়েছে, সঠিক পাথ আউটপুট করুন।

পথের উদাহরণ:

    /\
----+/
    |

• -এবং |অনুভূমিক এবং উল্লম্ব পাথ।
• /এবং \90 ° টার্ন হয়।
• +বর্তমান দিকের উপর নির্ভর করে -বা এক হিসাবে বিবেচিত হয় |।

পাথগুলি যে কোনও দিকে যেতে পারে এবং একটি অক্ষর একাধিক পথে ব্যবহৃত হতে পারে।

ইনপুটটি এরকম হবে:

       /--\
A------+--+--#
B------/  \--:
C------------#
D------------#

• A, B, Cএবং Dপাথ শুরু হয়
• # একটি প্রাচীর (পথ খারাপ)
• : শেষ (পথ সঠিক)

সুতরাং এখানে আউটপুট হবে B।

আপনি ধরে নিতে পারেন:

• :এবং #সর্বদা বাম থেকে পৌঁছে যাবে।
• কোনও পথ শুরুর ডানদিকে চরিত্রটি সর্বদা থাকবে -।
• পথ সর্বদা সুগঠিত হবে।
• #এবং :সর্বদা একই কলামে থাকবে।
• সর্বদা এক :এবং 4 টি পথ থাকবে।

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

A------#
B------#
C------#
D------:
=>
D

A-\ /---:
B-+-/ /-#
C-+---+-#
D-+---/
  \-----#
=>
B

  /-\
A-+\\---#
B-/\-\/-#
C----++-#
D----+/
     \--:
=>
A

A-\
B-+\
C-++\/----#
D-+++//---:
  \++-//--#
   \+--//-#
    \---/
=>
A

  /-\
A-+-/-\
B-+-+-\--#
C-+-/ |/-#
D-\---++-#
  \---+/
      \--:
=>
B

যেহেতু এটি কোড-গল্ফ , সংক্ষিপ্ত উত্তর জয়।

Comments

একই সাথে দু'টি পথের ঘটনা ঘটবে /নাকি \?

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

@ মার্টিনএন্ডার হ্যাঁ

— টেক্সক্রাফটিং

ওহ, এটি শেষ পরীক্ষার ক্ষেত্রে in স্পষ্টভাবে উল্লেখ করা মূল্যবান হতে পারে।

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

:বাম দিক থেকে সর্বদা পৌঁছে যাবে কি উপর থেকে বা নীচে থেকেও পৌঁছানো যাবে? অন্য কথায় শেষ কলামে #বা অন্য কোনও চরিত্র থাকতে পারে :?

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

SILOS উত্তর দয়া করে?

— রোহান ঝুনঝুনওয়ালা

Answer 1

স্লিপ , 47 বাইট

`a(?,[`-+]*((`/<|`\>)[`|+]*(`/>|`\<)[`-+]*)*`:)

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

অননুমোদিত বৈশিষ্ট্যগুলির জন্য হ্যাঁ ...

ব্যাখ্যা

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

Regex হিসাবে, দুর্ভাগ্যবশত, কিছু অনুলিপি কারণ \এবং /প্রয়োজন ভিন্নভাবে কিনা আমরা অনুভূমিকভাবে বা উল্লম্বভাবে যাচ্ছি উপর নির্ভর করে চিকিত্সা করা। প্লাস দিক থেকে, যেহেতু আমরা জানি যে পথটি অনুভূমিকভাবে শুরু হয় এবং শেষ হয়, তাই আমরা জানি যে প্রতিটি পথেই এর একটিও সংখ্যক \বা /একসাথে রয়েছে, যাতে আমরা এক সাথে তাদের দু'জনের সাথে মিলিয়ে যেতে পারি।

`a             # Match a letter.
(?,            # Match but don't include in output...
  [`-+]*       #   Match a horizontal piece of path, consisting of - or +.
  (            #   Match 0 or more vertical segments...
    (`/<|`\>)  #     Match a / and turn left, or a \ and turn right.
    [`|+]*     #     Match a vertical piece of path, consisting of | or +.
    (`/>|`\<)  #     Match a / and turn right, or a \ and turn left.
    [`-+]*     #     Match a horizontal piece of path, consisting of - or +.
  )*
  `:           #   Match a : to ensure that this is the correct path.
)

Comments

খুশির কোডের জন্য +1:)

— বেটসেক

Answer 2

পাইথন, 221 বাইট

def P(s,c=""):
 l=s.split("\n")
 v=[0,-1]
 p=[(i,l[i].index(":"))for i in range(len(l))if":"in l[i]][0]
 while c in"-:|+/\\":
    p=map(sum,zip(p,v))
    c=l[p[0]][p[1]]
    v=v[::1-(c=="\\")*2]
    if"/"==c:v=[-v[1],-v[0]]
 return c

প্রথম ইন্ডেনশনটি কেবল একটি স্থান, কিছুক্ষণের মধ্যে এটি একটি ট্যাব।

Answer 3

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

p=>(r=d=>(c="\\/ABCD".indexOf(p[x+=[-1,-w,w,1][d]])+1)>2?p[x]:r(d^c))(0,w=p.indexOf`
`+1,x=p.indexOf`:`)

পরীক্ষার কেস:

let f =
p=>(r=d=>(c="\\/ABCD".indexOf(p[x+=[-1,-w,w,1][d]])+1)>2?p[x]:r(d^c))(0,w=p.indexOf`
`+1,x=p.indexOf`:`)

var p0 = 'A------#\nB------#\nC------#\nD------:',
    p1 = 'A-\\ /---:\nB-+-/ /-#\nC-+---+-#\nD-+---/  \n  \\-----#',
    p2 = '  /-\\    \nA-+\\\\---#\nB-/\\-\\/-#\nC----++-#\nD----+/  \n     \\--:',
    p3 = 'A-\\        \nB-+\\       \nC-++\\/----#\nD-+++//---:\n  \\++-//--#\n   \\+--//-#\n    \\---/  ',
    p4 = '  /-\\     \nA-+-/-\\   \nB-+-+-\\--#\nC-+-/ |/-#\nD-\\---++-#\n  \\---+/  \n      \\--:';

console.log(p0, '=>', f(p0));
console.log(p1, '=>', f(p1));
console.log(p2, '=>', f(p2));
console.log(p3, '=>', f(p3));
console.log(p4, '=>', f(p4));

Answer 4

রুবি, 140 বাইট

->s{(?A..?D).find{|l,c|x=h=1
v=0
y=s[/.*#{l}/m].count$/
(v,h=c==?/?[-h,-v]:c==?\\?[h,v]:[v,h]
y+=v
x+=h)until(c=s.lines[y][x])=~/(:)|#/
$1}}

এটি repl.it এ চেষ্টা করুন: https://repl.it/CyJv

Ungolfed

->s{
  (?A..?D).find {|l,c|
    x = h = 1
    v = 0
    y = s[/.*#{l}/m].count $/

    ( v, h = c == ?/ ? [-h,-v] : c == ?\\ ? [h,v] : [v,h]
      y += v
      x += h
    ) until (c = s.lines[y][x]) =~ /(:)|#/

    $1
  }
}

Answer 5

পার্ল 211 বাইট

sub f{for($s=-1;++$s<~~@_;){if($_[$s][0]ne' '){$r=$s;$c=$m=0;$n=1;while($_[$r][$c]ne'#'){if($_[$r][$c]eq':'){return$_[$s][0];}($m,$n)=$_[$r][$c]eq'/'?(-$n,-$m):$_[$r][$c]eq'\\'?($n,$m):($m,$n);$r+=$m;$c+=$n;}}}}

Ungolfed:

sub q{
    for($start = -1; ++$start <~~@_;) {
        if($_[$start][0] ne ' ') {
            $row = $start;
            $col = $rowMove = 0;
            $colMove = 1;
            while($_[$row][$col] ne '#') {
                if($_[$row][$col] eq ':') {
                    return $_[$start][0];
                }
                ($rowMove, $colMove) =  $_[$row][$col] eq '/' ? (-$colMove,-$rowMove) : 
                                        $_[$row][$col] eq '\\' ? ($colMove,$rowMove) : 
                                        ($rowMove, $colMove);
                $row += $rowMove;
                $col += $colMove;
            }
        }
    }
}

এটি আমার প্রথম পার্ল গল্ফ, সুতরাং পরামর্শগুলি স্বাগত :)