Pascal/Turbo Pascal - Programar

   
Vista:

Programar

Publicado por kriptza (2 intervenciones) el 02/05/2009 20:08:49
Hola quisiera ayuda con esto, no encuentro manera de realizar que este programa en vez de leer y visualizar números, lea y visualice palabras.

PROGRAM MUESTRANUM;
USES CRT;
CONST
N= 3;
VAR
NUMERO:ARRAY [1..N] OF INTEGER;
I: INTEGER;
BEGIN
CLRSCR;

FOR I :=1 TO N DO
BEGIN
WRIDECLARACIÓNUZCA UN NUMERO POR FAVOR');
READLN (NUMERO [I]);
END;
fOR I:= 1 TO N DO
BEGIN
WRITELN (' EL NUMERO INTRODUCIDO POR PANTALLA ES',NUMERO [I]);
END;
READLN;
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

RE:Programar

Publicado por Pablo Garcia Alvarez (10 intervenciones) el 03/05/2009 01:01:19
PROGRAM MUESTRAWORD;
USES CRT;
CONST
N= 3;
VAR
PALABRA:ARRAY [1..N] OF STRING;
I:INTEGER;
BEGIN
CLRSCR;

FOR I :=1 TO N DO
BEGIN
WRITELN('INTRODUZCA UNA PALABRA POR FAVOR');
READLN (PALABRA[I]);
END;
FOR I:= 1 TO N DO
BEGIN
WRITELN ('LAS PALABRAS INTRODUCIDAS POR PANTALLA SON ',PALABRA[I]);
END;
READLN;
END.
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