programa salarios;
 
{ Criado por Giovani Da Cruz }
 
var
 
  vSalarioMinimo, vSalarioPessoa, vSalariosRecebidos : Real;
begin
 
  Escreva('Informe o valor do salario mínimo: ');
  Leia(vSalarioMinimo);
 
  Escreva('Informe o valor do seu salario atual: ');
  Leia(vSalarioPessoa);
 
  { Calculando os salários que a pessoa recebe }
  vSalariosRecebidos := vSalarioPessoa / vSalarioMinimo;
 
  { Exibindo a media das idades lidas }
  Escreva('Você recebe: ', (vSalariosRecebidos), ' salários mínimos!');
end.

program salarios;
 
{ Criado por Giovani Da Cruz }
 
var
 
  vSalarioMinimo, vSalarioPessoa, vSalariosRecebidos : Double;
begin
  Writeln('Salarios - Algoritmos Sequenciais. Show Delphi. (Giovani Da Cruz)' + #10#13);
 
 
  Write('Informe o valor do salario minimo: ');
  ReadLn(vSalarioMinimo);
 
  Write('Informe o valor do seu salario atual: ');
  ReadLn(vSalarioPessoa);
 
  { Calculando os salarios que a pessoa recebe }
  vSalariosRecebidos := vSalarioPessoa / vSalarioMinimo;
 
  { Exibindo a media das idades lidas }
  Writeln(#10#13 + 'Voce recebe: ', (vSalariosRecebidos) :0:2, ' salarios minimos!');
 
  Write(#10#13#10#13, 'Tecle "Entrer" para sair.');
  Readln;
 
end.

#include /*arquivo de cabeçalho onde se encontra as funções printf e scanf*/
int main() { /*função principal*/
 
 float salario_min, salario_pessoa, qtd_sal_min;
 
printf ("Informe o valor do salario minimo e \n R$ ");
scanf("%f",&salario_min); 
 
printf("Informe o valor do salario recebido pela pessoa \n R$ ");
scanf("%f",&salario_pessoa); 
 
qtd_sal_min=(salario_pessoa/salario_min); 
 
printf("Uma pessoa que recebe um salario de R$ %.2f reais recebe %.1f salarios minimos \n", salario_pessoa,qtd_sal_min); 
 
return 0;
}