Just another update

Task/Formatted-numeric-output/00META.yaml

@@ -1,4 +1,5 @@
 ---
 category:
 - Text processing
+- Simple
 note: Basic language learning

Task/Formatted-numeric-output/Mathematica/formatted-numeric-output.math

@@ -1,2 +1,2 @@
-StringJoin[ToString /@ PadLeft[Characters[ToString[ 7.125]], 9]]
-->"00007.125"
+StringTake["000000" <> ToString[7.125], -9]
+00007.125

Task/Formatted-numeric-output/REBOL/formatted-numeric-output.rebol

@@ -5,8 +5,8 @@ REBOL [
 	URL: http://rosettacode.org/wiki/Formatted_Numeric_Output
 ]
 
-; REBOL has no built-in facilities for printing pictured
-; output. However, it's not too hard to cook something up using the
+; REBOL has no built-in facilities for printing pictured output.
+; However, it's not too hard to cook something up using the
 ; string manipulation facilities.
 
 zeropad: func [

Task/Formatted-numeric-output/Scheme/formatted-numeric-output.ss

@@ -0,0 +1,7 @@
+(load "srfi-54.scm")
+(load "srfi-54.scm") ;; Don't ask.
+
+(define x 295643087.65432)
+
+(dotimes (i 4)
+  (print (cat x 25 3.0 #\0 (list #\, (- 4 i)))))