Bem vindo ao meu blog sobre Programação em linguagem pascal.

Bem, aqui tento passar alguma coisa do básico sobre a linguagem pascal, aulas que assiti nas vídeo-aulas do professor Neri, no curso "Lógica de programação", separei só o que falava de pascal, mas nas aulas agente aprende sobre java e C, colocarei aqui os problemas e o modo de fazer, não irei colocar os algoritmos e fluxogramas sobre pascal, colocarei os exemplos com minhas modificações, mas vale a pena comprar as vídeo aulas do profº Neri, farei até uma propaganda para ele(depois eu cobro), o site dele é http://www.informaticon.com.br confiram... e espero que eu possa passar algo de bom para quem está iniciando.

Vendas com salário e comissão variável.

Nesse exemplo ao final do dia verei quanto o vendedor ganhará, baseado no salário individual de cada e de comissão
individual, mostrando o salario, a comissão, quantidade de vendas e o total a receber.

program salario_variavel;

var salario, vendas, bonus, comissao, salario_total: real;


begin

   write('Salario=');
   readln(salario);
   write('porcentagem da comissao=');
   readln(bonus);
   write('Vendas=');
   readln(vendas);
   comissao:= (salario * bonus)/100 * vendas;
   salario_total:=(comissao + salario);
   writeln('Salario fixo........=',salario:6:0);
   writeln('Quantidade de vendas=',vendas:6:0 );
   writeln('comissao............=', comissao:6:2);
   writeln('salario total.......=', salario_total:6:2);
   readln();
end.
  

2 comentários:

  1. Como saber a porcentagem de uma comisao

    ResponderExcluir
    Respostas
    1. n tenho o salario como uma variavel

      WriteLn('Digite o nome do produto:');Read(NP);
      WriteLn('Digite o setor:');Read(Setor);
      WriteLn('Digite o valor do produto:');Read(Valor);
      WriteLn('Digite o nome do vendedor:');Read(Vendedor);

      Excluir