procedure main()
every write("x = ",(x:=0to 30)*.1,", y = ",1.105170833^x+5e-7?tab(find(".")+7))
end