procedure main() write(sin(0)) write(cos(0)) write(tan(1)) write(asin(0.5)) write(acos(0.5)) write(atan(0.5)) write(atan2(5,10.0)) write(dtor(360)) write(rtod(1)) end