Respostas
respondido por:
1
Algoritmo "paridade de inteiro"
Var
numero : Inteiro
Inicio
Escreva ("Digite um número inteiro: ")
Leia (numero)
Se (numero % 2 = 0) Entao
Escreva (numero, " é par.")
Senao
Escreva (numer, " é ímpar")
Fimse
Fimalgoritmo
Você pode baixar o arquivo .txt com os códigos que usei no Visualg.
Var
numero : Inteiro
Inicio
Escreva ("Digite um número inteiro: ")
Leia (numero)
Se (numero % 2 = 0) Entao
Escreva (numero, " é par.")
Senao
Escreva (numer, " é ímpar")
Fimse
Fimalgoritmo
Você pode baixar o arquivo .txt com os códigos que usei no Visualg.
Anexos:
Perguntas similares
7 anos atrás
9 anos atrás
9 anos atrás
9 anos atrás