Vendas mostrando salário e comissão fixa e com vendas variáveis.

Estou pretendendo fornecer salgados feitos por minha mamãe em mercados, mas vou contratar um vendedor, de ínicio  pagarei a ele um sálario fixo de R$510,00, mais uma comissão de 0.10%(1 décimo de real) do valor total de vendas no mês, quero um programa que me mostre o salario fixo, quantidade de vendas, o valor da comissão e o salario total do vendedor no fim do mês.

program salgados_vendas;

var salario, vendas, comissao, salario_total: real;


begin
   salario := 510;
   write('Vendas=');
   readln(vendas);
   comissao:= (salario * 0.10)/100 * vendas;
   salario_total:=(comissao + salario);
   writeln('Salario fixo........=',salario:6:0,' unidade');
   writeln('Quantidade de vendas=',vendas:6:0 );
   writeln('comissao............=', comissao:6:2,' 0.10%');
   writeln('salario total.......=', salario_total:6:2);
   readln();

end.