Need help with easy program

Hello, i'm rather new to pascal programming and i'm stuck on a pretty
easy program. I was hoping maybe someone would help me get it done.

Okay, so the task is:
Write a program which asks the user for a sum (x). The program has to
issue how this sum is possible to pay with 500, 100, 25, 10 and 1 monetary units. In first priority you must use the larger units.

Example what the result should look like:
Entered sum: 5472
5472 can be payed like this:
10x 500
4x 100
2x 25
2x 10
2x 1


Thanks in advance.