10 lines
171 B
Text
10 lines
171 B
Text
x$ = "1 2 3 1e11"
|
|
x$ = explode(x$, " ")
|
|
|
|
f = freefile
|
|
open f, "filename.txt"
|
|
|
|
for i = 0 to x$[?]-1
|
|
writeline f, int(x$[i]) + chr(9) + round(sqrt(x$[i]),4)
|
|
next i
|
|
close f
|