Data update

Task/Hash-from-two-arrays/Yabasic/hash-from-two-arrays.basic

@@ -0,0 +1,20 @@
+data "1", "one", "2", "two", "3", "three", "4", "four", "5", "five"
+
+dim keys$(5), values$(5)
+dim hash$(5)
+
+for i = 1 to arraysize(keys$(), 1)
+    read a$, b$
+    keys$(i) = a$
+    values$(i) = b$
+next i
+
+for i = 1 to arraysize(values$(), 1)
+    temp = val(keys$(i))
+    hash$(temp) = values$(i)
+next i
+
+for i = 1 to arraysize(hash$(), 1)
+    print keys$(i), " ", hash$(i)
+next i
+end