procedure main()
every i:=1to 9&write(repl(" ",9-i),(10^i/9)^2)
end