1 reply to this topic

[maylart]

Boa noite pessoal

estou montando um algoritmo para calcular valor de hora extra encima de um valor hora
só que quando executo o algoritmo enves dele ler a quantidade de horas que o funcionario fez
ele só soma e da o resultado tenho quase certeza que é a formula só que já quebrei a cabeça e
não consegui fazer ele calcular
segue abaixo o algoritmo que desenvolvi vale lembrar que eu gostaria de calcular as seguintes
porcentagem de 50% 60% 80% 100%

segue o algoritmo de 50%

var valor, porc, por50 :real;
begin
write ('Digite o valor da hora ' );
readln (valor);
write ('Digita hora a 50% ' );
readln (por50);
porc := valor*por50+valor ;
writeln (' ');
writeln('o valor total e : ' , porc :5:2);
readln;
end.

exemplo se roda-se certo colocariamo o valor da hora a R$5.00 aplicando 1 hora extra de 50% o resultado seria R$7,50
só que enves disso ele da R$ 6,00

alguem poderia me ajudar

[Philippe Dias]

tente isso:

var valor, porc :real;

begin

write ('Digite o valor da hora ' );
readln (valor);
porc := ((valor*50) / 100.00)+valor ;
writeln('o valor total com 50% : ' , porc :0:2);

porc := ((valor*60) / 100.00)+valor ;
writeln('o valor total com 60% : ' , porc :0:2);

porc := ((valor*80) / 100.00)+valor ;
writeln('o valor total com 80% : ' , porc :0:2);

porc := ((valor*100) / 100.00)+valor ;
writeln('o valor total com 100% : ' , porc :0:2);

readln;

end.