PROBLEMA: Elabore um algoritmo que receba uma entrada qualquer e verifique se é ou não uma entrada numérica.
Algoritmo:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
algoritmo "ContaNumero" var numero, aux: inteiro inicio escreva ("Digite um número: ") Leia (numero) aux := asc(carac(numero)) se aux = 0 entao escreval("Não é um número!") senao escreval("É um número!") fimse fimalgoritmo |
—
*Atualizado em 15 de maio de 2022
