Does Pocket PC have Text to Columns feature ? If so you can run Text to Columns on A1:A4 and use Space as delimiter.

if not...(again untested given don't have PocketPC)

B1: =TRIM(MID(SUBSTITUTE($A1," ",REPT(" ",100)),1+(COLUMNS($B1:B1)-1)*100,100))
copied across to E1