procedure main()
every write(1to 10&1)
end