Lista de exercicio em diagrama de blocos

algoritmo "média" var nota1, nota2, nota3, nota4, media : REAL inicio Escreva (" Digite nota 1: ") leia (nota1)
Escreva (" Digite nota 2: ") leia (nota2)
Escreva (" Digite nota 3: ") leia (nota3)
Escreva (" Digite nota 4: ") leia (nota4) media := (nota1 + nota2 + nota3 + nota4)/2 Se media>=6 entao Escreva ("Aprovado") senao Escreva ("Reprovado") fimse fimalgoritmo -------------------------------------------------

algoritmo "Soma" var num1, num2, soma : real inicio escreva ("Digite o primeiro numero: ") leia (num1) escreva ("Digito o segundo numero: ") leia (num2) soma := (num1 + num2) escreva ("A soma de ", num1, " + ", num2, " é de: ", soma)
-------------------------------------------------
fimalgoritmo algoritmo "semnome"

var num1, num2, multiplicacao, soma, subtracao, divisao : real inicio Escreva ("Digite dois numeros: ")
Leia (num1) leia (num2) soma := (num1 + num2) multiplicacao := (num1 * num2) subtracao := (num1-num2) divisao := (num1 / num2)
Escreva ("Soma = ", soma)
Escreva ("Subtracao = ", subtracao)
Escreva ("Divisão = ", divisao)
Escreva ("Multiplicação = ", multiplicacao)
-------------------------------------------------
Fimalgoritmo algoritmo "semnome" var nome, sexo : caracter salario : real idade : inteiro inicio Escreva ("Qual seu nome? ") leia (nome) escreva ("Qual seu sexo? masculino ou mulher: ") leia (sexo)
Escreva ("Qual o seu salário? ") leia (salario)
Escreva ("Qual sua idade?") leia (idade)

//---------------
Se sexo = "masculino" entao Se (idade >= 18) e (idade <= 30) entao Se (salario > 800.00) e (salario < 1120.00) entao Salario := (salario* 1.07) fimse fimse Se (idade >= 31) e (idade <=50) entao Salario := (salario * 1.09) fimse

Se (idade > 51 ) entao