Cobol en español PASAR DE HEXADECIMAL A DECIMAL
Cobol en español
  Página de Inicio Recomiéndala Contáctame Usuarios en Linea
67
     Crea Una cuenta  
Video 1
Video 2
Video 3

Si te ha servido la web
o te han gustado los videos, colabora haciendo click en el botón.

MANUALES
TEMATICOS
BASES DE DATOS
COBOL / WINDOWS
COBOL / UNIX
HISTORIA /DOCS
 
BUSCADOR
PROGRAMANDO-Dos
TRUCOS
AÑO 2.000
TEORIA POWCOB-3
PROG. POWCOB-3
TEORIA POWCOB-5
PROG. POWCOB-5
OCX-ESCOBOL
RUTINAS/MANUALES
OCX / JUEGOS
HERRAMIENTAS
COMPILADORES
ENCUESTAS
ENLACES
FOROS
TOP 10

CHAT   Usuarios: 0
ForosRM/CobolLeyendo    


  PASAR DE HEXADECIMAL A DECIMAL
Anonimo


 Enviado el 03-01-2004 :: 08:28   
FELIZ AÑO COBOLEROS:

ME GUSTARIA QUE ALGUIEN ME DIJERA COMO PUEDO PASAR DE HEXADECIMAL A DECIMAL. ¿CUAL ES EL PASO PARA QUE 1B=027, 26=038, 53=083, ETC?.

UN SALUDO Y GRACIAS POR ANTICIPADO.
 Citar
victor



San Sebastian
36 Mensajes

Off Line  OFF-Line

 Enviado el 07-01-2004 :: 08:54   
Hola:

Escribe esta secuencia y veras el resultado
0027
0038
0083
IDENTIFICATION DIVISION.
PROGRAM-ID. VER.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 dato1 pic 9999 binary value 0.
01 dato2 redefines dato1.
03 filler pic x.
03 dato3 pic x.
01 dato4 pic 9999.
PROCEDURE DIVISION.
INICIO.
move x"1b" to dato3
move dato1 to dato4
display dato4
move x"26" to dato3
move dato1 to dato4
display dato4
move x"53" to dato3
move dato1 to dato4
display dato4
stop run.

Espero que te sirva y ademas tambien sirve para hacer lo contrario

un saludo

Victor



 Perfil  Citar

  


Sitio desarrollado con PHP-Nuke. Todos los Derechos Reservados.
PHP-Nuke es un Software Libre realizado con licencia GNU/GPL.
Página creada en Junio de 1.998, con el proposito de difundir el lenguaje Cobol en nuestra lengua.
Andres Montes [98/11]