Informática, perguntado por brunatassi12, 8 meses atrás

Ajuda com VISUALG. Não estou conseguindo criar esse algoritmo. "Faça um algoritmo que calcule a média de salários de uma empresa, pedindo ao usuário o nome dos funcionários e os salários e devolvendo a média, o salário mais alto e o salário mais baixo. Use nome = “fim” para encerrar a leitura."

Soluções para a tarefa

Respondido por fqpl059
1

Resposta:

O algoritmos desenvolvido em VisualG está abaixo.

Espero ter ajudado :)

Algoritmo:

Algoritmo "calculadora_salario"

// Disciplina   : [Linguagem e Lógica de Programação]

// Professor   : Antonio Carlos Nicolodi  

// Descrição   : Aqui você descreve o que o programa faz! (função)

// Autor(a)    : Nome do(a) aluno(a)

// Data atual  : 28/01/2021

Var

// Seção de Declarações das variáveis

total : real

nome : caractere

funcionarios : inteiro

valor : real

media : real

valor_maior : real

nome_maior : caractere

valor_menor : real

nome_menor : caractere

Inicio

// Seção de Comandos, procedimento, funções, operadores, etc...  

escreval("Calculador de média 2000!") // Desculpa não resisti :)

enquanto nome <> "fim" faca

        escreva("Informe o nome do funcionário: ")

        leia(nome)

         

        se nome <> "fim" entao

           escreva("Informe o salário do funcionário: ")

           leia(valor)

           se ((valor_menor = 0) ou (valor < valor_menor)) entao

              valor_menor <- valor

              nome_menor <- nome

           fimse

           se valor > valor_maior entao

              valor_maior <- valor

              nome_maior <- nome

           fimse

           total <- total + valor

           fimse

           funcionarios <- funcionarios + 1

fimenquanto

escreva("O maior salário é de R$")

escreva(valor_maior)

escreva(" pertencente ao ")

escreva(nome_maior)

escreval("!")

escreva("O menor salário é de R$")

escreva(valor_menor)

escreva(" pertencente ao ")

escreva(nome_menor)

escreval("!")

media <- total / funcionarios

escreva("A média de salários da empresa é R$")

escreva(media)

escreval("!")

Fimalgoritmo


fqpl059: Problemas?
fqpl059: Baixe o arquivo pelo Google Drive:
fqpl059: https://drive.google.com/file/d/1RrGIQxG-hVP0tbehOqwXHjT4Z-m60zRg/view?usp=sharing
fqpl059: Desejo sucesso brunatassi12 :)
Perguntas interessantes