6 lines
94 B
Text
6 lines
94 B
Text
pi=:3 :0
|
|
smoutput"0'3.1'
|
|
n=.0 while.n=.n+1 do.
|
|
smoutput-/1 10*<.@o.10x^1 0+n
|
|
end.
|
|
)
|