Foro de elhacker.net

Programación => Programación General => Mensaje iniciado por: oxi12pek en 6 Noviembre 2012, 20:36 pm



Título: Ayuda freepascal
Publicado por: oxi12pek en 6 Noviembre 2012, 20:36 pm
Hola a todos! Me gustaria saber como puedo leer un string de x tamaño y que la lectura termine al pulsarle a enter.
Gracias


Título: Re: Ayuda freepascal
Publicado por: dennis094 en 17 Noviembre 2012, 22:46 pm
Hola,
no entiendo muy bien tu pregunta.. pero yo entiendo que tu quieres introducir un string, y que al pulsar enter, se muestre en pantalla el numero que has ingresado, en ese caso la funcion seria:

program LeerString;
var num:string;
begin
writeln('LEER STRING');
writeln;
write('Introduzca el string');
readln(num)
writeln('El string introducido es: ',num);
readln;
end.