Pascal/Turbo Pascal - Pascal: arrays/registro.

   
Vista:

Pascal: arrays/registro.

Publicado por Marisa (4 intervenciones) el 28/04/2008 22:30:12
TYPE
Alumno=RECORD
nombre:string[40];
edad:integer;
END;
Curso=RECORD
Turno1:ARRAY[1..5] OF Alumno;
Turno2:ARRAY[1..5] OF Alumno;
Turno3:ARRAY[1..5] OF Alumno;
END;
VAR
Academia:ARRAY[1..10] OF Curso;

-------------------------------------------------------------------------------------------------------------------------

Begin
Writeln ('Introduzca el nombre y los apellidos');
Readln (nombrecompleto);
academia[CursoSel].turno1[valido].nombre:=nombrecompleto;

-------------------------------------------------------------------------------------------------------------------------

IF gruposel=1 THEN
FOR j:=1 TO 5 DO
Begin
Writeln((academia[cursosel].turno1[j].nombre));
End;

Son tres trozos de un programa que tengo que hacer.
El problema es que al ejecutar el tercer pedazo, sólo muestra la primera letra del nombre guardado con el segundo.
Supongo que será alguna cosa muy obvia, pero no la veo. Agradezco toda ayuda.
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

RE:Pascal: arrays/registro.

Publicado por Diego Romero (997 intervenciones) el 28/04/2008 22:33:58
De qué tipo es "nombrecompleto"?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Pascal: arrays/registro.

Publicado por Marisa (4 intervenciones) el 28/04/2008 22:39:57
Integer
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Pascal: arrays/registro.

Publicado por Marisa (4 intervenciones) el 28/04/2008 22:41:17
Pd:Gracias, Diego.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Pascal: arrays/registro.

Publicado por Diego Romero (997 intervenciones) el 29/04/2008 05:35:32
De nada xD.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar