Hacer un programa de pascal..!!

Cerrado
Denunciar
-
 xx -
Hola,

bueno pues lo que necesito es hacer un programa de pascal con el codigo de ASCII
me podrian ayudar a decirme como le podria hacer.. o darme un ejemplo. io
o no se decirme como le podria hacer ...:D

7 respuestas

Message postés
16470
Date d'inscription
sábado, 31 de mayo de 2008
Estatus
Moderador
Última intervención
jueves, 20 de enero de 2022
11
program SansNom;

var i:integer;
begin
for i:=0 to 255 do
    writeln(i:3,' ',chr(i));

writeln; write('Fin du programme. Appuyer sur Entree'); readln;
end.
10
nesecito aprender programar en pasacal lo mas sencillo posible por favor le agradecere mucho
Miguel
3
Message postés
16470
Date d'inscription
sábado, 31 de mayo de 2008
Estatus
Moderador
Última intervención
jueves, 20 de enero de 2022
11
0

gracia mpor consteatar
0
como pudo hacer un programa de menu en pascal
0
Message postés
16470
Date d'inscription
sábado, 31 de mayo de 2008
Estatus
Moderador
Última intervención
jueves, 20 de enero de 2022
11
Por ejemplo :
procedure posibilidad_1;
begin
end;

procedure posibilidad_2;
begin
end;

procedure posibilidad_3;
begin
end;

procedure Menu;
var s:string; b:boolean;
begin
writeln('Elegir una opcion entre : ');
writeln;
writeln('1 : posibilidad 1');
writeln('2 : posibilidad 2');
writeln('3 : posibilidad 3');
writeln;
b:=true;

while b do
      begin
      write('Eleccion : ');
      readln(s);
      if s='1' then begin
                    b:=false;
                    posibilidad_1;
                    end;  
      if s='2' then begin
                    b:=false;
                    posibilidad_2;
                    end;
      if s='3' then begin
                    b:=false;
                    posibilidad_3;
                    end;
      end;
end;
0
que por que tengo los hojos saltados
y poreso medisen sapo
0
oye tio quisas esto es lo que quieres


program numero16;
Uses
crt;
var
i,n: Integer;
begin
clrscr;
writeln ('CODIGO ASCCI:');
for i:=1 to 225 do
begin
Writeln (i,' car ',chr(i));
delay (100);
end;

Readln;
End.



pero para la proxima explicate mas

y espero q te sirva de algo vale

si nesesitas algo mas pide y aver si te puedo ayudar

#######################
# #
# by klk #
# #
######################
0
che gallego deja de hacerte el superado nene..se un pokito mas humilde si es q sabes..asi no llegas a ningun lado!
0
ensima es de lo mas basico el programa jajaja
0

realizar un programa en pascal para el proceso de inscripcion de una universidad, donde se leen los siguientes datos de 80 estudiantes para el cuarto o sexto semestre de ingeneria en sistemas: nombre, cedula, semestre, sexo y codigo de cinco materias (solo 10 codigo o 10 materias). el programa realizara:

listado de los estudiantes ordenado por cedula
listado de los estudiantes por semestre que indique el usuario
listado por materia que indique el usuario
cantidad de los alumnos inscritos en el cuarto semestre, cantidad de alumnos inscritos del sexto semestre y cantidad total de alumnos inscritos
porcentaje de mujeres por semestre y porcentaje de hombres por semestre
cantidad de alumnos inscritos por materia
0
program ascII;
uses crt;
var a: char;
i: integer;
begin
for i:= 1 to 20 do
begin
clrscr;
writeln('introduzca una letra: ');
readln(a);
writeln('el codigo ASCII es: ',integer(a));
readkey;
end;
end.
0