TI-81 перевод координат из декартовой системы в полярную и наоборот

Еще один простой пример программы на TI-81. На мой взгляд удобнее встроенной функций R-﹥P и P-﹥R.