7 lines
94 B
Text
7 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.
|
||
|
|
)
|