Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- {*Elabore um algoritimo que leia o valor do slario minimo e o valor do salario
- de uma pessoa.Calcule quantos salarios minimos essa pessoa ganha*}
- program salariominimo;
- var salario:real;
- const
- salariominimo = 724;
- begin
- {*Entrada*}
- writeln('Digite o salario');
- readln(salario);
- {*Processamento*}
- writeln('Fulano recebe ',salario/salariominimo:2:2 , ' salarios minimos');
- {*pause*}
- readln();
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement