Question

ME AJUDEM POR FAVOR !!!!!!!!!!
3) Faça um algoritmo que leia um valor e escrever se é positivo, negativo ou
nulo.

Answer 1

Fiz no VisuAlg 3:

Var

num:inteiro

 

Inicio

     escreval("Digite um Número: ")

     leia(num)

   se(num < 0) entao

     escreval("Negativo")

   senao

   se(num > 0) entao

     escreval("Positivo")

   senao

   escreval("Igual a zero! Nulo !")

     fimse

     fimse

Fimalgoritmo