Determine if a string is numeric: Difference between revisions
Determine if a string is numeric en BASIC256
m (→{{header|REXX}}: added a few more examples, changed comments and glyphs.) |
(Determine if a string is numeric en BASIC256) |
||
Line 863:
1010 R=T1$=S$ OR T1$=" "+S$
1099 RETURN</lang>
==={{header|BASIC256}}===
<lang BASIC256>
#La función isNumeric() es nativa de BASIC256.
#Devuelve 1 (verdadero) si la expresión es un entero,
#un número de punto flotante o una cadena que se puede
#convertir directamente en un número.
#De lo contrario, devuelve 0 (falso).
#Las siguientes cadenas numéricas son válidas:
#“123”, “-345”, “234.234324”, “-34234.123”, “-2.567e7” y “6.7888E-8”.
s = "1234.056789"
print s, " => "; isNumeric(s)
s = "-2.567e7"
print s, " => "; isNumeric(s)
s = "Dog"
print s, " => "; isNumeric(s)
s = "Bad125"
print s, " => "; isNumeric(s)
s = "-0177"
print s, " => "; isNumeric(s)
s = "0b1110" #binario
print s, " => "; isNumeric(s)
s = "0o177" #octal
print s, " => "; isNumeric(s)
s = "0xff" #hexadecimal
print s, " => "; isNumeric(s)
end
</lang>
{{out}}
<pre>
1234.056789 => 1
-2.567e7 => 1
Dog => 0
Bad125 => 0
-0177 => 1
0b1110 => 1
0o177 => 1
0xff => 0
</pre>
| |||