Pascal/Turbo Pascal - matrices

   
Vista:

matrices

Publicado por Constanza Concha (1 intervención) el 20/09/2010 22:42:50
Lo que necesito es como poder ordenar por nombres de la A a la Z (creando un procedimieto para eso). Además necesito saber como BUSCAR a personas q tengan el mismo hobbie, mostrar todos los datos de cada persona y contar cuantas personas tienen el mismo hobbie..
por favor necesito ayuda!!!

Procedure Ingresar;
Begin
For x:= 1 to 6 do begin
ClrScr;
gotoxy (5,5); write ('Nombre : ');
gotoxy (5,8); write ('Hobbie : ');
gotoxy (5,11);write ('Direcci¢n : ');
gotoxy (5,14);write ('E-mail : ');
gotoxy (5,17);write ('Fecha de nacimiento : ');
gotoxy (27,5); ReadLn (nombre); Matriz [x,1] := nombre ;
gotoxy (27,8); ReadLn (hobbie); Matriz [x,2] := hobbie ;
gotoxy (27,11);ReadLn (direccion); Matriz [x,3] := direccion;
gotoxy (27,14);ReadLn (email); Matriz [x,4] := email ;
gotoxy (27,17);ReadLn (fecha); Matriz [x,5] := fecha;
ClrScr;
End;
End;
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder