algoritmo "37l"
// Escreva um programa que leia um número inteiro. Se o número lido for positivo,
// escreva uma mensagem indicando se ele é par ou ímpar.
// Se o número for negativo, escreva a seguinte mensagem
//“Este número não é positivo”.
var
num,resto : inteiro
inicio
escreval("Digite um número")
leia(num)
resto <- num mod 2
se ( resto = 0) entao
escreva("O numero ",NUM, " é par e ")
senao
escreva("O numero ",num," é ímpar e ")
fimse
se ( num >= 0) entao
escreval(" positivo.")
senao
escreval(" não é positivo.")
fimse
fimalgoritmo
Nenhum comentário:
Postar um comentário