Question

Eu gostaria de saber se esse cálculo está correto. Algoritmo matemática
Var
numero : inteiro
Const
x = 1
Inicio
escreva("Escreva um número: ")
leia(numero)
Enquanto x > 1 faça

se numero MOD 2 = 0 entao
escreva("O número ", numero, " é par")
senao
escreva("O número ", numero, " é impar")
fim_se
Fim_enquanto
Fim

Answer 1

Resposta:

O calculo está correto porém o programa nunca executaria pois o valor da constante "x" nunca seria maior que 1, o mais adequado seria retirar a constante "x" e a estrutura de repetição do código assim ficando:

Explicação:

Var

numero : inteiro

Inicio

escreva("Escreva um número: ")

leia(numero)

se numero MOD 2 = 0 entao

escreva("O número ", numero, " é par")

senao

escreva("O número ", numero, " é impar")

fim_se

Fim