CLC.
提示='将程度转换为升压或升级升级度;
选项=输入（提示，'）
转变选项
案件'博士'
Angled =输入（'以学位进入角度'）;
如果〜Isempty（倾斜）
rad = degle * pi / 180
x = fprintf（'角度等于％f rountians'，rad）;
DISP（x）
案件'rd'
钓鱼者=输入（'在宽透频中输入角度'）;
如果〜isempty（垂钓者）
deg =弧度* 180 / pi
y = fprintf（'角度为％f dege'，deg）;
除此以外
DISP（'无效选项'）
结尾
