Galera .. alguem q entenda de pascal e gerar programas...
me ajudem.. estou precisando gerar um programa pra um trabalho na Uerj
O programa tem como entrada:
*Valor do Empréstimo
*Tempo de Pagamento
*Taxa de Juros percentual
O programa tem como saída:
* " O valor da prestação será de : "
Me ajudem, por favor
Abraços
Programa De Ipd - Uerj ( Introdução Ao Processamento De Dados )
Started By Bernardo Lima, 06/12/2007, 11:46
1 reply to this topic
#2
vida loca
-
- Usuários
-
- 5 posts
Novato no fórum
- Sexo:Masculino
- Localidade:camamu - ba
Posted 31/01/2008, 18:09
chegou um pouco tarde espero q ainda teja em tempo de ajudar
quando tiver duvida tente posta ate onde vc conseguir
[codebox]var
Val_Empr, tem_pag_em_ano,Tax_Juros_perc: real {a taxa de pagamento sera em anos}
taxa, parcelas, calc, quant_mes: real
inicio
quant_mes := 0
escreva ("Digite o valor do Imprestimo: ")
leia (Val_Empr)
escreva ("qual o tempo de Pagamento: ")
leia (tem_pag_em_ano)
escreva ("digite a taxa de juros: ")
leia (Tax_Juros_perc)
quant_mes := tem_pag_em_ano * 12
calc := Val_Empr / quant_mes
taxa := calc * Tax_Juros_perc/100
parcelas := calc + taxa
escreva ("O valor da prestação será de: ",parcelas)
fimalgoritmo[/codebox]
quando tiver duvida tente posta ate onde vc conseguir
[codebox]var
Val_Empr, tem_pag_em_ano,Tax_Juros_perc: real {a taxa de pagamento sera em anos}
taxa, parcelas, calc, quant_mes: real
inicio
quant_mes := 0
escreva ("Digite o valor do Imprestimo: ")
leia (Val_Empr)
escreva ("qual o tempo de Pagamento: ")
leia (tem_pag_em_ano)
escreva ("digite a taxa de juros: ")
leia (Tax_Juros_perc)
quant_mes := tem_pag_em_ano * 12
calc := Val_Empr / quant_mes
taxa := calc * Tax_Juros_perc/100
parcelas := calc + taxa
escreva ("O valor da prestação será de: ",parcelas)
fimalgoritmo[/codebox]
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)
