[ Foro de Pascal ]

Ejemplo urge

Necesito ayuda con este programa

Es un programa que imprima el nombre hasta pulsar la letra n

es urgente

Es un programa corto en el que deberás hacer uso de "ReadKey" y "KeyPressed". Yo usaría un ciclo Repeat Until anidado en otro del mismo tipo. Más o menos sería así, pruébalo y me cuentas:

programa imprimirNombreHastaPresionarn;
uses Crt;
const nombre='Rodrigo';

BEGIN
    Repeat
       Repeat
            write(nombre,' ');
       Until (KeyPressed);    {El ciclo finaliza hasta que se presione cualquier tecla}
    Until (ReadKey='n');    {El ciclo finaliza si la tecla presionada es 'n'}
    readln;
END.

Espero haberte ayudado, solo hay que leer en la documentación sobre esas dos funciones.

Saludos.