Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Blog
RENAN AZEREDO DA FONSECA 600618046
program RenanAzeredo; uses crt; var vf, tj, am, prest:real; n:integer; begin vf:= 15475; tj:= vf*0.0158; am:= vf/8; n:=1; while(n<=8) do begin tj := vf*1.0158; prest := am + tj; vf := vf - am; writeln (am:10, ' ' , tj:10 , ' ' , prest:10 , ' ' , vf:10); n := n+1; end; writeln('Parcelas'); end.
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
sandogh 1
Fibonasi
Zad 3 b
quadratic equation
2
Huong11a2@
mod/div
test29
NOT a String in Pascal
Task1-3
Please log in to post a comment.