รายการที่เชื่อมโยงเป็นทวีคูณเป็นโครงสร้างข้อมูลที่แต่ละโหนดมีvalue"ลิงก์" รวมถึงทั้งสองpreviousและถัดไปnodesในรายการ ตัวอย่างเช่นพิจารณาโหนดต่อไปนี้ที่มีค่า 12, 99 และ 37:

นี่โหนดที่มีค่า12และ99ชี้ไปที่ของตนnextโหนดที่มีค่า99และ37 โหนดที่มีค่า37ไม่มีnextตัวชี้เนื่องจากเป็นโหนดสุดท้ายในรายการ ในทำนองเดียวกันโหนดที่มีค่า99และ37ชี้ไปที่previousโหนดที่เกี่ยวข้อง12และ99แต่12ไม่มีpreviousตัวชี้เนื่องจากเป็นโหนดแรกในรายการ

การตั้งค่า

ในทางปฏิบัติ "ลิงก์" ของโหนดนั้นถูกนำไปใช้เป็นตัวชี้ไปยังตำแหน่งของโหนดก่อนหน้าและถัดไปในหน่วยความจำ สำหรับวัตถุประสงค์ของเรา "หน่วยความจำ" จะเป็นอาเรย์ของโหนดและตำแหน่งของโหนดจะเป็นดัชนีในอาเรย์ โหนดสามารถจะคิดว่าเป็น 3 ( prev value next )อันดับของแบบฟอร์ม ตัวอย่างด้านบนอาจมีลักษณะเช่นนี้:

แต่มันอาจเป็นแบบนี้แทน:

เริ่มต้นที่โหนดใด ๆ คุณสามารถติดตามpreviousลิงก์ (แสดงเป็นจุดกำเนิดของลูกศรสีแดง) เพื่อไปยังโหนดที่อยู่ก่อนหน้าและnextลิงก์ (ลูกศรสีเขียว) เพื่อค้นหาโหนดลำดับถัดไปเพื่อรับค่าโหนดทั้งหมดตามลำดับ: [12, 99, 37].

แผนภาพแรกด้านบนสามารถแสดงเป็นอาร์เรย์[[null, 12, 1], [0, 99, 2], [1, 37, null]]ได้ [[2, 99, 1], [0, 37, null], [null, 12, 0]]ที่สองนั้นจะเป็น

ความท้าทาย

เขียนโปรแกรมที่ใช้เป็นอาร์เรย์ของโหนดและดัชนีของโหนดและส่งคืนตามลำดับรายการค่าของโหนดในรายการที่เชื่อมโยงเป็นสองเท่าเดียวกัน

ภาวะแทรกซ้อน

"หน่วยความจำ" จะไม่ประกอบด้วยโหนดของรายการเดียวเท่านั้น มันอาจมีหลายรายการ:

อาร์เรย์ด้านบนมีรายการที่เชื่อมโยงสองสามรายการรหัสสีเพื่อความสะดวกของคุณ:

1. โหนดที่ดัชนี7, 10, 1, 4, 3, 12(แสดงเฉพาะnextการเชื่อมโยงไปลดความยุ่งเหยิง; คลิกเพื่อดูภาพขยาย):

   

   ได้รับอาร์เรย์นี้และใด ๆ [0, 1, 1, 2, 3, 5, 8]ของดัชนีเหล่านี้โปรแกรมของคุณควรจะกลับในการสั่งซื้อค่า

2. โหนดที่ดัชนี9:

   

   ได้รับดัชนีโปรแกรมของคุณควรจะกลับ9[99]

3. โหนดที่ดัชนี11, 8, 0, 6, 2:

   

   [2, 3, 5, 7, 11]รับหนึ่งของดัชนีเหล่านี้ก็ควรจะกลับ

กฎระเบียบ

อินพุต

โปรแกรมของคุณจะได้รับเป็นอินพุต:

1. รายการของโหนด ((3-tuples ตามที่อธิบายไว้ข้างต้น) โดยที่ 1 ≤𝒏≤ 1,000 ในรูปแบบที่สะดวกใด ๆ เช่นอาร์เรย์ของอาร์เรย์อาร์เรย์ "แบน" ของจำนวนเต็มที่มีความยาว3𝒏เป็นต้น

   องค์ประกอบของ 3-tuples อาจอยู่ในลำดับใดก็ได้: ( prev value next ),, ( next prev value )ฯลฯ สำหรับแต่ละโหนดprevและnextจะเป็นnull(หรือค่าที่สะดวกอื่น ๆ เช่น-1) เพื่อระบุโหนดแรกหรือโหนดสุดท้ายในรายการที่เชื่อมโยงเป็นสองเท่าหรือดัชนีที่ถูกต้องของ รายการทั้ง 0- หรือ 1 ตามที่สะดวก valueจะเป็นจำนวนเต็มแบบ 32 บิตที่ลงนามหรือประเภทจำนวนเต็มมากที่สุดที่ภาษาของคุณรองรับแล้วแต่จำนวนใดจะน้อยกว่า

2. ดัชนี𝒑ของโหนดในรายการ (1) โหนดที่ระบุอาจเป็นโหนดแรกในรายการที่ลิงก์เป็นสองเท่าโหนดสุดท้ายโหนดกลางหรือแม้แต่โหนดเดียว

รายการอินพุต (1) อาจมีข้อมูลทางพยาธิวิทยา (เช่นวงรอบโหนดที่ชี้ไปยังโหนดอื่น ๆ ) แต่ดัชนีอินพุต (2) จะชี้ไปที่โหนดที่สามารถส่งเอาต์พุตเดี่ยวที่มีรูปแบบถูกต้อง สรุปได้ว่า

เอาท์พุต

โปรแกรมของคุณควรส่งออกค่าของโหนดของรายการที่เชื่อมโยงเป็นทวีคูณซึ่งโหนดที่ดัชนี𝒑เป็นสมาชิกตามลำดับรายการ เอาต์พุตสามารถอยู่ในรูปแบบที่สะดวก แต่ข้อมูลจะต้องรวมเฉพาะโหนดvalue s

การชนะ

นี่คือรหัสกอล์ฟรหัสกอล์ฟคำตอบที่สั้นที่สุดในการชนะไบต์ ช่องโหว่มาตรฐานใช้

กรณีทดสอบ

ด้านล่างแต่ละกรณีทดสอบเป็นของแบบฟอร์ม:

X)
prev value next, prev value next, ...
index
value value value ...

... โดยที่Xจดหมายจะระบุกรณีทดสอบบรรทัดที่สองคือรายการอินพุตบรรทัดที่สามคือดัชนีอินพุต 0-based และบรรทัดที่สี่คือเอาต์พุต

A) null 12 1, 0 99 2, 1 37 null
   1
   12 99 37

B) 2 99 1, 0 37 null, null 12 0
   1
   12 99 37

C) 8 5 6, 10 1 4, 6 11 null, 4 3 12, 1 2 3, 12 8 null, 0 7 2, null 0 10, 11 3 0, null 99 null, 7 1 1, null 2 8, 3 5 5
   4
   0 1 1 2 3 5 8

D) 8 5 6, 10 1 4, 6 11 null, 4 3 12, 1 2 3, 12 8 null, 0 7 2, null 0 10, 11 3 0, null 99 null, 7 1 1, null 2 8, 3 5 5
   0
   2 3 5 7 11

E) 8 5 6, 10 1 4, 6 11 null, 4 3 12, 1 2 3, 12 8 null, 0 7 2, null 0 10, 11 3 0, null 99 null, 7 1 1, null 2 8, 3 5 5
   9
   99

F) 13 80 18, 18 71 null, 5 10 19, 12 1 8, 19 21 null, 31 6 2, 17 5 26, 26 0 30, 3 -1 25, null 1 23, 27 6 17, 14 1 24, 28 -1 3, null 80 0, 20 4 11, 33 6 29, 24 9 33, 10 7 6, 0 67 1, 2 15 4, 32 1 14, null 1 31, 29 3 null, 9 -1 28, 11 5 16, 8 1 null, 6 3 7, null 8 10, 23 1 12, 15 5 22, 7 9 null, 21 3 5, null 3 20, 16 2 15
   18
   80 80 67 71

G) 13 80 18, 18 71 null, 5 10 19, 12 1 8, 19 21 null, 31 6 2, 17 5 26, 26 0 30, 3 -1 25, null 1 23, 27 6 17, 14 1 24, 28 -1 3, null 80 0, 20 4 11, 33 6 29, 24 9 33, 10 7 6, 0 67 1, 2 15 4, 32 1 14, null 1 31, 29 3 null, 9 -1 28, 11 5 16, 8 1 null, 6 3 7, null 8 10, 23 1 12, 15 5 22, 7 9 null, 21 3 5, null 3 20, 16 2 15
   8
   1 -1 1 -1 1 -1 1

H) 13 80 18, 18 71 null, 5 10 19, 12 1 8, 19 21 null, 31 6 2, 17 5 26, 26 0 30, 3 -1 25, null 1 23, 27 6 17, 14 1 24, 28 -1 3, null 80 0, 20 4 11, 33 6 29, 24 9 33, 10 7 6, 0 67 1, 2 15 4, 32 1 14, null 1 31, 29 3 null, 9 -1 28, 11 5 16, 8 1 null, 6 3 7, null 8 10, 23 1 12, 15 5 22, 7 9 null, 21 3 5, null 3 20, 16 2 15
   4
   1 3 6 10 15 21

I) 13 80 18, 18 71 null, 5 10 19, 12 1 8, 19 21 null, 31 6 2, 17 5 26, 26 0 30, 3 -1 25, null 1 23, 27 6 17, 14 1 24, 28 -1 3, null 80 0, 20 4 11, 33 6 29, 24 9 33, 10 7 6, 0 67 1, 2 15 4, 32 1 14, null 1 31, 29 3 null, 9 -1 28, 11 5 16, 8 1 null, 6 3 7, null 8 10, 23 1 12, 15 5 22, 7 9 null, 21 3 5, null 3 20, 16 2 15
   14
   3 1 4 1 5 9 2 6 5 3

J) 13 80 18, 18 71 null, 5 10 19, 12 1 8, 19 21 null, 31 6 2, 17 5 26, 26 0 30, 3 -1 25, null 1 23, 27 6 17, 14 1 24, 28 -1 3, null 80 0, 20 4 11, 33 6 29, 24 9 33, 10 7 6, 0 67 1, 2 15 4, 32 1 14, null 1 31, 29 3 null, 9 -1 28, 11 5 16, 8 1 null, 6 3 7, null 8 10, 23 1 12, 15 5 22, 7 9 null, 21 3 5, null 3 20, 16 2 15
   17
   8 6 7 5 3 0 9

K) 4 11 0, null 22 3, null 33 3, 1 44 4, 3 55 null, 7 66 7, 6 77 6
   3
   22 44 55

L) null -123 null
   0
   -123

05AB1E , 25 ไบต์

è[¬D0‹#Isè]\[`sˆD0‹#Isè]¯

ลองออนไลน์!

คำอธิบาย

è[¬D0‹#Isè]\[`sˆD0‹#Isè]¯   # Arguments n, a
è                           # Get element at index n in a
 [¬D0‹#Isè]                 # Find the first element in the list
 [                          # While true, do
  ¬                         #   Head (get index of previous element)
   D0‹#                     #   Break if lower than 0
       Isè                  #   Get the element at that index
          ]                 # End loop
           \                # Delete top element of stack
            [`sˆD0‹#Isè]    # Iterate through list
            [               # While true, do
             `sˆ            #   Add value to global array and keep next index on stack
                D0‹#Isè     #   Same as above
                       ]    # End loop
                        ¯   # Push global array

Haskell , 79 65 59 55 ไบต์

-6ไบต์ขอบคุณที่Brute Force

x#i|let-1!d=[];i!d=i:x!!i!!d!d=[x!!i!!1|i<-last(i!0)!2]

กำหนดฟังก์ชั่น#ที่รับรายการรายการจำนวนเต็มซึ่งnullแสดงเป็น-1และส่งคืนรายการค่าโหนด

ลองออนไลน์!

คำอธิบาย

let-1!d=[];i!d=i:x!!i!!d!d

กำหนดฟังก์ชั่น!ที่วนซ้ำผ่านโหนดที่เริ่มต้นที่โหนดiและส่งกลับรายการดัชนีที่เยี่ยมชม มันรับอาร์กิวเมนต์ที่สองdที่ระบุซึ่งดัชนีของ "tuple" ใช้เป็นดัชนีของโหนดถัดไป ( d==2ย้ำไปข้างหน้าd==0เพื่อย้ำกลับหลัง)

(i!0)

ทำซ้ำย้อนหลังเริ่มต้นจากดัชนีที่กำหนดและกลับดัชนีที่เยี่ยมชม

last(i!0)

ใช้ดัชนีที่เยี่ยมชมล่าสุดซึ่งเป็นจุดเริ่มต้นของรายการ

last(i!0)!2

ทำซ้ำตั้งแต่ต้นรายการ

[x!!i!!1|i<-last(i!0)!2]

แทนที่ดัชนีที่เยี่ยมชมแต่ละรายการด้วยค่าของโหนด

Python 2 , 60 ไบต์

l,n=input()
while~n:m=n;n=l[n][0]
while~m:p,v,m=l[m];print v

ลองออนไลน์!

นี่คือคำตอบของ Chas Brown สวยลบกอล์ฟเหล่านี้:

• ฉันใช้ซ้ำ n, บันทึกการบ้าน
• ฉันเก็บ n ที่ถูกต้องล่าสุดเป็น m อนุญาตให้ฉัน
• วางงานพิมพ์หลังจากที่ได้รับมอบหมายในบรรทัด 3 ช่วยฉันพิมพ์สุดท้าย
• ฉันใช้เพียง ~ n แทน - ~ n เนื่องจากค่าลบเป็นความจริงเหมือนกับค่าบวกประหยัด 2 ตัวอักษร

ทำความสะอาด , 94 90 88 ไบต์

import StdEnv
$l[_,u,v]|v<0=[u]=[u: $l(l!!v)]
?l= $l o until((>)0o hd)((!!)l o hd)o(!!)l

ลองออนไลน์!

MATL , 39 ไบต์

XHx`HwI3$)t]x6Mt`Hwl3$)tbhwt]x4L)Hw2I$)

ลองออนไลน์!

เกือบจะเป็นพอร์ตโดยตรงของคำตอบ Octave ของฉัน แต่เวอร์ชันนี้ค้นหาจุดสิ้นสุดก่อนแล้วจึงกลับไปทำงานแทนที่จะกลับมาทางอื่นซึ่งช่วยให้รอดได้หนึ่งไบต์

XHx           % Store array in H.
`HwI3$)t]     % Work to the end of the array
x6Mt          % Delete the end of array delimiter, and push the array end index twice
`Hwl3$)    t] % Work to the beginning of the array
       tbhw   % Append all indices found.
Hw2I$)        % Index into original array.

PHP, 132 ไบต์

<?list(,$x,$y)=$argv;parse_str($x);while(($q=$x[$y*3+1])>=0)$y=$q;do{$n[]=$x[$y*3+2];$y=$x[$y*3];}while($x[$y*3]);echo join(' ',$n);

ลองออนไลน์!

การป้อนข้อมูลเป็นที่เป็นสตริงการสืบค้นx[]=-1&x[]=1&x[]=1...(โหนดทั้งหมดในอาเรย์แบน) ในการสั่งซื้อของnext, prevแล้วvalueสำหรับแต่ละโหนดมี -1 ใช้สำหรับการสิ้นสุดโหนด

Python 2 , 81 77 ไบต์

a,n=input()
u=a[n][0]
while-~u:u,v,w=a[u]
while-~w:print v;u,v,w=a[w]
print v

ลองออนไลน์!

แก้ไข: ขอบคุณนาย Xcoder เป็นเวลา 4 ไบต์ ...

รับรายการ tuples [u, v, w] โดยที่ u และ w เป็น -1 เพื่อแสดงจุดเริ่มต้น / สิ้นสุดของส่วนรายการที่เชื่อมโยง

อ็อกเทฟ , 81 78 76 ไบต์

function o=f(a,n)while q=a(n,1)o=a(n=q,2);end
while n=a(n,3)o=[o a(n,2)];end

ลองออนไลน์!

ค่อนข้างตรงไปตรงมารุ่น คำอธิบายถูกทิ้งไว้เป็นแบบฝึกหัดให้กับผู้อ่าน เวอร์ชั่นที่สนุกสนานมากขึ้นมีการแสดงไว้ด้านล่าง:

คู่ , 142 99 92 ไบต์

@(a,n)[(p=@(b,c,z){q=a(z,2),@()[b(b,c,a(z,c)),q]}{2-~a(z,c)}())(p,1,n),p(p,3,n)(end-1:-1:1)]

ลองออนไลน์!

โย่ฉันได้ยินมาว่าคุณชอบฟังก์ชั่นนิรนาม ...

รับnx3อาร์เรย์โดยที่คอลัมน์แรกเป็นตัวเลือกก่อนหน้าคอลัมน์ที่สองจะเป็นค่าและค่าที่สามคือโหนดตัวตายตัวแทน ดัชนีโหนดทั้งหมดใช้ 1 ซึ่งเป็นค่าเริ่มต้นใน Octave

% Create an anonymous function, taking an array a and first node n
@(a,n)
% Returns an array containing the predecessor and sucessor nodes
      [                                                                     ,                     ]
% Defines an recursive anonymous function (by supplying itself to the local namespace)
% which looks at the first column (c=1) or last column (c=3) of the input array to get the next nodes
       (p=@(p,c,z)                                                   )(p,1,n)
% Create a cell array, either containing the end node,
                    {q=a(z,2),                       
% ...or an array with all next  next nodes and the current node
% (note the use of an anonymous function taking no parameters to defer array access, in case of the last node)                
                              @()[p(p,c,a(z,c)),q]}
% depending whether the next node number is nonzero (followed by () to execute the deferred array access)
                                                    {2-~a(z,c)}()
% Do the same with c=3, reverse (function p builds the array right-to-left) and drop the current node to prevent a duplicate.                                                                             
                                                                             p(p,3,n)(end-1:-1:1)

Kotlin , 85 ไบต์

{g,S->generateSequence(generateSequence(S){g[it][0]}.last()){g[it][2]}.map{g[it][1]}}

เชิดชู

{g,S->
    generateSequence(generateSequence(S){g[it][0]}.last()){ g[it][2]}.map { g[it][1] }
}

ทดสอบ

typealias Node=Triple<Int?,Int?,Int?>
data class Test(val input: List<Node>, val start:Int, val result: List<Int>)
val TEST = listOf<Test>(
Test(
listOf(Node(null, 12, 1), Node(0, 99, 2), Node(1, 37, null)),
1,
listOf(12, 99, 37)
),
Test(listOf(
Node(2, 99, 1), Node(0, 37, null), Node(null, 12, 0)),
1,
listOf(12, 99, 37)
),
Test(
listOf(Node(8, 5, 6), Node(10, 1, 4), Node(6, 11, null), Node(4, 3, 12), Node(1, 2, 3), Node(12, 8, null), Node(0, 7, 2), Node(null, 0, 10), Node(11, 3, 0), Node(null, 99, null), Node(7, 1, 1), Node(null, 2, 8), Node(3, 5, 5)),
4,
listOf(0, 1, 1, 2, 3, 5, 8)
),
Test(
listOf(Node(8, 5, 6), Node(10, 1, 4), Node(6, 11, null), Node(4, 3, 12), Node(1, 2, 3), Node(12, 8, null), Node(0, 7, 2), Node(null, 0, 10), Node(11, 3, 0), Node(null, 99, null), Node(7, 1, 1), Node(null, 2, 8), Node(3, 5, 5)),
0,
listOf(2, 3, 5, 7, 11)
),
Test(
listOf(Node(8, 5, 6), Node(10, 1, 4), Node(6, 11, null), Node(4, 3, 12), Node(1, 2, 3), Node(12, 8, null), Node(0, 7, 2), Node(null, 0, 10), Node(11, 3, 0), Node(null, 99, null), Node(7, 1, 1), Node(null, 2, 8), Node(3, 5, 5)),
9,
listOf(99)
),
Test(
listOf(Node(13, 80, 18), Node(18, 71, null), Node(5, 10, 19), Node(12, 1, 8), Node(19, 21, null), Node(31, 6, 2), Node(17, 5, 26), Node(26, 0, 30), Node(3, -1, 25), Node(null, 1, 23), Node(27, 6, 17), Node(14, 1, 24), Node(28, -1, 3), Node(null, 80, 0), Node(20, 4, 11), Node(33, 6, 29), Node(24, 9, 33), Node(10, 7, 6), Node(0, 67, 1), Node(2, 15, 4), Node(32, 1, 14), Node(null, 1, 31), Node(29, 3, null), Node(9, -1, 28), Node(11, 5, 16), Node(8, 1, null), Node(6, 3, 7), Node(null, 8, 10), Node(23, 1, 12), Node(15, 5, 22), Node(7, 9, null), Node(21, 3, 5), Node(null, 3, 20), Node(16, 2, 15)),
18,
listOf(80, 80, 67, 71)
),
Test(
listOf(Node(13, 80, 18), Node(18, 71, null), Node(5, 10, 19), Node(12, 1, 8), Node(19, 21, null), Node(31, 6, 2), Node(17, 5, 26), Node(26, 0, 30), Node(3, -1, 25), Node(null, 1, 23), Node(27, 6, 17), Node(14, 1, 24), Node(28, -1, 3), Node(null, 80, 0), Node(20, 4, 11), Node(33, 6, 29), Node(24, 9, 33), Node(10, 7, 6), Node(0, 67, 1), Node(2, 15, 4), Node(32, 1, 14), Node(null, 1, 31), Node(29, 3, null), Node(9, -1, 28), Node(11, 5, 16), Node(8, 1, null), Node(6, 3, 7), Node(null, 8, 10), Node(23, 1, 12), Node(15, 5, 22), Node(7, 9, null), Node(21, 3, 5), Node(null, 3, 20), Node(16, 2, 15)),
8,
listOf(1, -1, 1, -1, 1, -1, 1)
),
Test(
listOf(Node(13, 80, 18), Node(18, 71, null), Node(5, 10, 19), Node(12, 1, 8), Node(19, 21, null), Node(31, 6, 2), Node(17, 5, 26), Node(26, 0, 30), Node(3, -1, 25), Node(null, 1, 23), Node(27, 6, 17), Node(14, 1, 24), Node(28, -1, 3), Node(null, 80, 0), Node(20, 4, 11), Node(33, 6, 29), Node(24, 9, 33), Node(10, 7, 6), Node(0, 67, 1), Node(2, 15, 4), Node(32, 1, 14), Node(null, 1, 31), Node(29, 3, null), Node(9, -1, 28), Node(11, 5, 16), Node(8, 1, null), Node(6, 3, 7), Node(null, 8, 10), Node(23, 1, 12), Node(15, 5, 22), Node(7, 9, null), Node(21, 3, 5), Node(null, 3, 20), Node(16, 2, 15)),
4,
listOf(1, 3, 6, 10, 15, 21)
),
Test(
listOf(Node(13, 80, 18), Node(18, 71, null), Node(5, 10, 19), Node(12, 1, 8), Node(19, 21, null), Node(31, 6, 2), Node(17, 5, 26), Node(26, 0, 30), Node(3, -1, 25), Node(null, 1, 23), Node(27, 6, 17), Node(14, 1, 24), Node(28, -1, 3), Node(null, 80, 0), Node(20, 4, 11), Node(33, 6, 29), Node(24, 9, 33), Node(10, 7, 6), Node(0, 67, 1), Node(2, 15, 4), Node(32, 1, 14), Node(null, 1, 31), Node(29, 3, null), Node(9, -1, 28), Node(11, 5, 16), Node(8, 1, null), Node(6, 3, 7), Node(null, 8, 10), Node(23, 1, 12), Node(15, 5, 22), Node(7, 9, null), Node(21, 3, 5), Node(null, 3, 20), Node(16, 2, 15)),
14,
listOf(3, 1, 4, 1, 5, 9, 2, 6, 5, 3)
),
Test(
listOf(Node(13, 80, 18), Node(18, 71, null), Node(5, 10, 19), Node(12, 1, 8), Node(19, 21, null), Node(31, 6, 2), Node(17, 5, 26), Node(26, 0, 30), Node(3, -1, 25), Node(null, 1, 23), Node(27, 6, 17), Node(14, 1, 24), Node(28, -1, 3), Node(null, 80, 0), Node(20, 4, 11), Node(33, 6, 29), Node(24, 9, 33), Node(10, 7, 6), Node(0, 67, 1), Node(2, 15, 4), Node(32, 1, 14), Node(null, 1, 31), Node(29, 3, null), Node(9, -1, 28), Node(11, 5, 16), Node(8, 1, null), Node(6, 3, 7), Node(null, 8, 10), Node(23, 1, 12), Node(15, 5, 22), Node(7, 9, null), Node(21, 3, 5), Node(null, 3, 20), Node(16, 2, 15)),
17,
listOf(8, 6, 7, 5, 3, 0, 9)
),
Test(
listOf(Node(4, 11, 0), Node(null, 22, 3), Node(null, 33, 3), Node(1, 44, 4), Node(3, 55, null), Node(7, 66, 7), Node(6, 77, 6)),
3,
listOf(22, 44, 55)
),
Test(
listOf(Node(null, -123, null)),
0,
listOf(-123)
)
)

var f:(List<List<Int?>>,Int)-> Sequence<Int?> =
{g,S->generateSequence(generateSequence(S){g[it][0]}.last()){g[it][2]}.map{g[it][1]}}

fun main(args: Array<String>) {
    for ((input, start, result) in TEST) {
        val out = f(input.map { it.toList() }, start).toList()
        if (out != result) {
            throw AssertionError("$input $start $result $out")
        }
    }
}

TIO

TryItOnline

JavaScript ES6, 70 63 ไบต์

(x,i,a)=>(h=_=>i&&h(a(x[i].v),i=x[i].n))(x.map(_=>i=x[i].p||i))

กรณีทดสอบ:

F([undefined,{p:0,v:12,n:2},{p:1,v:99,n:3},{p:2,v:37,n:0}],1,alert)