Questões de algoritmo (pseudocodigo)

1. faça um algoritmo que receba “n” números e mostre positivo , negativo ou zero para cada numero.
Algoritmo num_1
Var
num: real pergunta: caractere

Inicio

pergunta 0) então Escreva("Positivo") Senão Se (num = 0) então Escreva("O número é igual a 0") Senão Escreva(“Negativo”) Fimse Fimse

Escreva("Deseja continuar(sim/não)")
Leia(pergunta)

Fimenquanto
Fimalgoritmo

2. faça um algoritmo que leia um numero de 1 a 5 e escreva por extenso. Caso o usuário digite um numero que não esteja neste intervalo, exibir mensagem: numero invalido.
Algoritmo num2
Var

num: inteiro

Inicio
Escreva("Informe um numero entre 1 a 5:")
Leia(num)

Caso (num) Seja 1 faca Escreva("Numero um") Seja 2 faca Escreva("Numero dois") Seja 3 faca Escreva("Numero três") Seja 4 faca Escreva("Numero quatro") Seja 5 faca Escreva("Numero cinco") Senão Escreva("Numero invalido")

Fimcaso
Fimalgoritmo

3. Escrever um algoritmo para uma empresa que decide dar um reajuste para seus 584 funcionários de acordo com os seguintes critérios:
a) 50% para aqueles que ganham menos de três salários mínimos;
b) 20% para aqueles que ganham entre três até dez salários mínimos;
c) 15% para aqueles que ganham acima de dez até vinte salários mínimos;
d) 10% para os demais funcionários;
Leia o nome dos funcionários, seu salario e o novo salario mínimo. Calcule o seu novo salario reajustado. Escrever o nome do funcionário, o reajuste e seu novo salario. Calcule quanto à empresa vai aumentar sua folha de pagamento.

Algoritmo num_3
Var

nome: caractere salario, s_minimo, qtd_salario, reajuste, total: real i: inteiro

Inicio

Para i de 1 ate 584 passo 1 faca Escreva("Informe o nome:") Leia(nome) Escreva("Informe o salario:") Leia(salario) Escreva("Informe o valor do salario mínimo:") Leia(s_minimo)