procedure main()
every writes(0to 99999," ")
end