Saludos.
Adjunto código del programa:
Código:
program numero;
var
n:integer;
begin
writeln('Programa creado por Bit.');
write('Ingrese número entero positivo:');
readln(n);
while (n<=-1) do
begin
writeln('Por favor, usted debe ingresar un número entero positivo:');
readln(n);
end;
writeln('Correcto,El número ingresado es un entero positivo');
readln;
end.
Al ejecutar el programa, no muestra los tildes correctamente.
Si por ejemplo uso el ° (Lo muestra incorrectamente en pantalla)
Utilizo free pascal, lazarus. Con el sistema operativo Windows.
¿Qué modificación le harías al código?