ASCII en pascal

[periCo[un]Ltd.]

Despues de dias de buscar, yo solo (aunque no lo crean) descubri como imprimia codigo ascii en pascal

Código:

var
 a:char;
begin
 a:=#86;
 write(a);
end.

con este imprime el Alt+86, por ejemplo

Código:

var
 a:char;
begin
 for a:=#1 to #255 do
  write(a);
end.

con este imprime todos los caracteres ascii, desde el 1 al 255



Pero aun no he logrado encontrar la manera de que el usuario yngrese un numero y aparezca el caracter ascii correspondiente
¿alguien tiene idea de como hacerlo?

[Kaopectate]

Hola periCo[un]Ltd.

Prueba esto:

Código PHP:

  var 
 a:char; 
begin 
 for a:='a' to 'z' do 
  write(a, '=', ord(a)); 
end.  
   

Saludos.

[Relket]

Que tal Perico:
Lo que necesitas es utilizar la funcion predefinida denominada Chr(X), la X la puedes sustituir por cualquier valor entre 0 y 255, y te devuelve el caracter ASCII del mismo.

Ejemplo: (Lo que pedias era que se introdujera un número por teclado y que te presentara el Caracter ASCII de ese valor)

Código PHP:

  var  
    a:byte; 
begin 
    readln(a);        {Aquí se lee el valor introducido.} 
    write(chr(a));   {Se presenta el caracter ASCII de a. } 
end.  
   

Espero que te sirva.

[periCo[un]Ltd.]

Gracias Relket, funciona perfecto