B

Task/Collections/BBC-BASIC/collections-1.bbc

@@ -0,0 +1,3 @@
+      DIM text$(1)
+      text$(0) = "Hello "
+      text$(1) = "world!"

Task/Collections/BBC-BASIC/collections-2.bbc

@@ -0,0 +1,5 @@
+      DIM collection{(1) name$, year%}
+      collection{(0)}.name$ = "Richard"
+      collection{(0)}.year% = 1952
+      collection{(1)}.name$ = "Sue"
+      collection{(1)}.year% = 1950

Task/Collections/BBC-BASIC/collections-3.bbc

@@ -0,0 +1,24 @@
+      DIM node{name$, year%, link%}
+      list% = 0
+      PROCadd(list%, node{}, "Richard", 1952)
+      PROCadd(list%, node{}, "Sue", 1950)
+      PROClist(list%, node{})
+      END
+
+      DEF PROCadd(RETURN l%, c{}, n$, y%)
+      LOCAL p%
+      DIM p% DIM(c{})-1
+      !(^c{}+4) = p%
+      c.name$ = n$
+      c.year% = y%
+      c.link% = l%
+      l% = p%
+      ENDPROC
+
+      DEF PROClist(l%, c{})
+      WHILE l%
+        !(^c{}+4) = l%
+        PRINT c.name$, c.year%
+        l% = c.link%
+      ENDWHILE
+      ENDPROC