(PASCAL) Problema con un Promedio :S

[MasterXNicoX]

Jejeje, Disculpen que los moleste para esta tonteria, pero nose porque tengo un error aca..

PROGRAM Promedio_Alumno;
VAR a,b,c,d,e,f:INTEGER;
BEGIN
WRITELN('Este programa calcula el Promedio de un Alumno:');
WRITELN (' ');
WRITE ('Introduzca el Nombre del Alumno: '); READLN (a);

WRITE ('Introduzca la Primer Nota del Alumno: '); READLN (b);
WRITE ('Introduzca la Segunda Nota del Alumno: '); READLN (c);
WRITE ('Introduzca la Tercera Nota del Alumno: '); READLN (d);
WRITELN (' ');
e:= (b+c+d) div 3;
WRITE ('EL PROMEDIO DE ',a, ' ES: ',e);
readln (f);
END.

Supuestamente el programa tiene que calcular el promedio de un alumno que tiene tres calificaciones...

Bueno, el programa funciona bien...

Pero...................

Si en el nombre le pongo por ejemplo: "juancito". La ventana se cierra, antes de que tome los datos...

En cambio si le pongo de nombre por ejemplo: "65". Hace todo el calculo normal...

Porque puede ser que no me tome las letras donde va el nombre y si me tome los numeros???

Alguna Solucion??

Espero Que me Puedan Ayudar... Un abrazo.

[rahd_rr]

mmmmm sera por que la variable donde guardas el nombre la declaras como INTEGER!!!
deberia ser string!!!

[dogduck]

Efectivamente. a debe de ser string, con longitud de 30 carácteres seguramente te bastará

VAR b,c,d,e,f:INTEGER;
a:STRING[30];

salu2

[MasterXNicoX]

Muchisimas gracias a los dos :) Problema Solucionado ^^ jeje

Un Abrazo!!