Pascal Procedure

Hey guys, learning pascal here. I'm new to this programming thing and i've got a problem that's been bugging me.

I've gotta write a procedure called print_words which receives a string as a parameter, and print all the words contained in the that string. Consider all the characters other than space as components of a word. So if i type:

This is a test 12$%ab

the program must return me:

This
is
a
test
12$%ab

Would anyone help me?

>>13
Joke's on you, i live in Brazil.
Dude, I'm a 36 years old broke advertiser.
I lost my house, my partner in my agency died, my woman left me (because I'm broke as fuck). No lies, no excuses, I'm trying to learn something new to pull myself outta this situation.