Logica visual g

TRABALHO DE LOGICA E PROGRAMAÇAO
PROFª ELIZANGELA

algoritmo "Exercicio 1 . Faça um programa que receba dois números e mostre a subtração do primeiro pelo segundo."
// Função : Subtraçao
// Autor :
// Data : 23/3/2012
// Seção de Declarações var num1,num2,resul:real inicio escreva ("Digite o primiro numero:" ) leia (num1) escreva ("Digite o segundo numero:" ) leia (num2) resul<-num1-num2 escreva ("O resultado da Subtracao e:" ,resul)
// Seção de Comandos fimalgoritmo algoritmo "Exercício 5 . Faça um programa que calcule um desconto de 10%.
// Função : Calcular o Desconto
// Autor :
// Data : 23/3/2012
// Seção de Declarações
Var
preco, valdes:real inicio escreva ("Digite o Valor da Etiqueta do Produto em Promocao: ") leia (preco) valdes <- (preco)* 0.9 escreva ("Seu Produto Custa Agora Somente: ", valdes)

// Seção de Comandos
Fimalgoritmo

algoritmo "Exercício 6.Calculo da Comissão mais Salário Final."
// Função : Calcular a Comissão
// Autor :
// Data : 24/3/2012
// Seção de Declarações var salfixo,vendas,comis,salfinal:real inicio escreva("Digite o Salario do Colaborador: ") leia (salfixo) escreva ("O valor de Vendas no Periodo: ") leia (vendas) comis <- vendas * 0.04 escreval("Comissao no Periodo: ",comis) salfinal <- salfixo+comis escreva ("O Salario Final do Colaborador: ", salfixo+comis)

// Seção de Comandos
Fimalgoritmo

algoritmo "Exercício 9. Calculo da área de um trapézio."
// Função :Calcular Area do Trapezio
// Autor :
// Data : 24/3/2012
// Seção de Declarações var baseg,basep,altura,area:real inicio escreval("Vamos Calcular a Area de Um Trapezio") escreva("Digite o valor da Base Maior e tecle <enter>:" ) leia (baseg) escreva ("Digite o valor da Base Menor e tecle <enter>: ") leia (basep) escreva ("Digite o valor da Altura:" ) leia (altura) area<-((baseg+basep)*altura)/2 escreva ( "A area do Trapezio sera:", area)

//