// se asigna el resultado de la conversión de radianes a grados, al botón res_grados;
asignar_etiqueta(res_grados,'= '+(radianes*180/pi)+'º');
// se asigna el resultado de la conversión de grados a radianes, al botón res_radianes;
asignar_etiqueta(res_radianes,'= '+(grados*pi/180)+'rad');

// se define el valor de la variable pi;
pi:=3.141592;
// se crea una variable que contendrá el valor de los radianes a convertir;
radianes:=pi;
// se construye una entrada para recibir el valor de los radianes que se quieren convertir;
entrada_radianes:=crear_entrada(-5,4,10,1.5,'radianes');
asignar_color(entrada_radianes,blanco);
asignar_valor(entrada_radianes,radianes);
// se crea un botón para mostrar el resultado de la conversión de radianes a grados;
res_grados:=crear_boton(5,4,10,1.5);
asignar_color(res_grados,verde);
//;
// se crea una variable que contendrá el valor de los grados a convertir;
grados:=180;
// se construye una entrada para recibir el valor de los grados que se quieren convertir;
entrada_grados:=crear_entrada(-5,-4,10,1.5,'grados');
asignar_color(entrada_grados,blanco);
asignar_valor(entrada_grados,grados);
// se crea un botón para mostrar el resultado de la conversión de grados a radianes;
res_radianes:=crear_boton(5,-4,10,1.5);
asignar_color(res_radianes,rosa);