9 lines
288 B
Plaintext
9 lines
288 B
Plaintext
x$ = "1, 2, 3, 1e11"
|
|
y$ = "1, 1.4142135623730951, 1.7320508075688772, 316227.76601683791"
|
|
|
|
open "filename" for output as #f ' Output to "filename"
|
|
for i = 1 to 4
|
|
print #f, using("##############.###",val(word$(x$,i,",")));"|";using("#######.#####",val(word$(y$,i,",")))
|
|
next i
|
|
close #f
|