7 lines
87 B
Text
7 lines
87 B
Text
import io
|
|
|
|
procedure main()
|
|
local n
|
|
n := 1024
|
|
while n := write(0 < n) / 2
|
|
end
|