Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
RENAN COSTA CARLOS DA CUNHA 600623343
program pg; uses crt; var fin,jur,amort,prest:real; n:integer; begin fin:=15432; jur:=fin*0.0158; amort:=fin/8; n:=1; while (n<=8) do begin jur:=fin*1.0158; prest:=amort+jur; fin:=fin-amort; writeln (amort:10:2, ' ',jur:10:2, ' ',prest:10:2, ' ',fin:10:2); n:=n+1; end; writeln ('parcelas'); end.
run
|
edit
|
history
|
help
0
6
2
VINICIUS ELIAS SILVEIRA 600625519
Escribir numeros a palabras hasta 4 digitos
342
4546
zadacha4
Kelipatan
24/10/17
Why does not work?