Data update

Task/Spiral-matrix/EasyLang/spiral-matrix.easy

@@ -0,0 +1,32 @@
+proc mkspiral n . t[] .
+   subr side
+      for i to l
+         ind += d
+         t[ind] = cnt
+         cnt += 1
+      .
+   .
+   len t[] n * n
+   l = n
+   while cnt < len t[]
+      d = 1
+      side
+      l -= 1
+      d = n
+      side
+      d = -1
+      side
+      l -= 1
+      d = -n
+      side
+   .
+.
+n = 5
+mkspiral n t[]
+numfmt 0 3
+for i to n * n
+   write t[i]
+   if i mod n = 0
+      print ""
+   .
+.

Task/Spiral-matrix/Wren/spiral-matrix.wren

@@ -1,4 +1,4 @@
-import "/fmt" for Conv, Fmt
+import "./fmt" for Conv, Fmt
 
 var n = 5
 var top = 0