Question

Desenvolver um algoritmo que leia um número não determinado de valores e calcule e escreva a média aritmética dos valores lidos, a quantidade de valores positivos, a quantidade de valores negativos

Answer 1

→→→

Resposta:

Algoritmo:

Algoritmo "programa"

Var

i, num, numpos, numneg, somanums, soma:inteiro

Inicio

     numpos<-0

     numneg<-0

     somanums<-0

     soma<-0

     enquanto i<>1 faca

          escreva("Digite um número ou 0 para parar: ")

          leia(num)

          se  num=0 entao

              i<-1

          senao

                se num>0 entao

                    numpos<-numpos+1

                senao

                    numneg<-numneg+1

                fimse

                somanums<-somanums+num

                soma<-soma+1

          fimse

     fimenquanto

     escreval("A média aritmética dos números lidos é:", somanums/soma)

     escreval("A quantidade de valores positivos é:",numpos)

     escreval("A quantidade de valores negativos é:",numneg)

Fimalgoritmo

Explicação:

→→→