Programa de Cálculo de Juros em Pascal

Outro leitor, o Marcos, também está com uma dúvida em Pascal.

Fazer um programa para cálculo de juros, onde você entra com o valor da conta, dias em atraso, multa e juros e calcula o valor total a pagar.

Se o problema for compilação a minha recomendação é o Free Pascal.

O problema resolvido abaixo. Qualquer dúvida entre em contato.

Program Salario;
Uses crt;
var
conta, multa, juros, valor, total: real;
atraso : Integer;
Begin
ClrScr;
Write ('Informe o valor conta: '); ReadLn(conta);
Write ('Informe os dias em atraso: '); ReadLn(atraso);
Write ('Informe a multa: '); ReadLn (multa);
Write ('Informe os juros(%): '); ReadLn (juros);
if (conta>0) then
total := conta+multa+conta*(juros/100);
Write (' O total a pagar por atraso de ',atraso, ' dias foi ',total:10:2);
ReadLn;
End.

3 comentários:

  1. ola boa noite
    como eu poderia fazer um programa onde soma juros composto e simpre

    data de compra:01/01/2013
    data de vencimento: 31/01/2013
    valor: 100,00
    multa:1%
    juros ao mês:5,5%
    -------------------------------------------
    desse dado gostaria de fazer um algaritimo
    assim que me de quantos dia esta em atraso
    valor do juros
    e valor total com o juros e a multa

    ResponderExcluir
  2. Olá... Faço um Tec. ADM e lá, na disciplina de Matemática Financeira, a professora está passando uma matéria de Juros Simples e após, dará Juros Composto...
    Entendo um pouco da linguagem Pascal, mas não consegui fazer um programa para conferir as respostas dos meus cálculos...
    Se fosse possível, gostaria que me ajudasse com os dois...(Juros simples e composto)...
    Obrigada

    ResponderExcluir
  3. Posso sim, Jéssica.... Vou fazer uma postagem para isso.
    Atenciosamente

    ResponderExcluir