duda, case of...
Publicado por wind (26 intervenciones) el 06/04/2014 23:42:56
Saludos cordiales.
Estoy experimentando con case of. Estuve ejecutando un ejemplo en la web y lo amplie.
----------
La pregunta es: ¿ De que manera incluyo los números negativos y los números flotantes? '-1' .. '-9' (No me funciona)
Estoy experimentando con case of. Estuve ejecutando un ejemplo en la web y lo amplie.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program Project1;
{$codepage UTF8}
VAR caracter : Char;BEGIN
Write('Ingrese un caracter :');
Readln(caracter);
CASE caracter OF
'A'..'Z',#165 : Writeln('Ingresaste una mayuscula');
'a'..'z',#164 : Writeln('Ingresaste una minuscula');
'@':writeln('Ingresaste un arroba');
'0'..'9':writeln('Ingresaste un numero entero:');
END;
readln;
END.----------
La pregunta es: ¿ De que manera incluyo los números negativos y los números flotantes? '-1' .. '-9' (No me funciona)
Valora esta pregunta
0