I Need a program to divide cents?

if some1 can help me i need a program in pascal to divide cents like 854 cents = 5 dollars, 2 dollars 1 dollar and 1 half and 4 cents like this o,o