// Elaborar un algoritmo que permita leer un numero en radianes _rad e imprima su equivalente en grados°
// versión 1.0.0 ultima edicion 17/Oct/2014
// By Jaimeza www.jaimeza.org
// Para ejecutar este codigo use PSEINT [url]http://pseint.sourceforge.net[/url]
Proceso convert_rad_a_grados
Limpiar Pantalla
// Declarar // variables y constantes
// Constantes
Definir PI_ Como Real;
PI_ = 3.14159265359; //
// Variables
Definir radianes Como Real; // para almacenar el numero en radianes
Definir grados Como Real; // para almacenar el numero en grados
// Solicitar
imprimir "numero en radianes";
leer radianes; // almacena la entrada en radianes
// Calcular
grados = radianes*(180/PI_)
imprimir radianes, "_radian(es) equivalen a ", grados, "°"; // imprime la salida
FinProceso
// Ejemplos
// 0.785398163397_radianes son 45_grados
// 57.2957795131_° es 1_rad
Comentarios sobre la versión: 1.0.0 (1)