Pascal/Turbo Pascal - pantalla

En pascal... como hago para que el usuario.., en la corrida del programa, al presionar un tecla de caracteres diga el programa ('ERROR coloque numeros positivos'). GRACIAS.

es depende de tu programa...
pero yo lo haria

(con el ejemplo que tu variable se llame "a")

if a>0 then
(sentencias)
else
Write('ERROR: ingrese solo numeros positivos');

o... con "Case" no se si conoces el uso del "Case"

pero tendria que saber mas de tu programa

No se entiende bien tu pregunta. Por favor dinos qué tipo de dato es el que pides y de qué forma lo haces actualmente.

por ejemplo:

writeln('Coloque la cantidad de nietos');
readln(n);
while (n<=0) do begin
writeln('ERROR');
writeln;
writeln('coloque la cantidad de nietos');
readln(n);
end;

esto estringe los numeros negativos... ¿como puedo hacer para restringir los todos caracteres? (a..z , A..Z , ª!"·$%&/()=?¿*^Ǩ_:) todo eso. gracias

Entiendo. A pesar de que en tu ejemplo deberías usar un repeat y no un while :P.

No, no es posible interferir en el funcionamiento del procedimiento Read/ReadLn, tendrás que hacerte un procedimiento o función "a medida".