Question

faca um algoritimo que informe um numero inteiro,verefique se e um numero positivo ou negativo escrevendo a respectiva mensagem?

Answer 1

algoritmo "semnome"

var

valor: inteiro

um: inteiro

inicio

um <- 1

Escreva("Digite um valor ")

leia(valor)

se valor > um entao

    Escreva("Positivo")

senao entao

    Escreva("Negativo")

fimse

fimalgoritmo