-- example uit python
include readf.e        -- haal lees routine 
integer bedrag,aantal 
puts(1,"Geef een bedrag (in een geheel getal) : ")
bedrag = readf(0,"%d") -- geeft het getal in een lijst
bedrag = bedrag[1]     -- haal het getal uit de lijst
                                    
-- ontleed het getal in de euro munt eenheid .
for  munt in {500,200,100,50,20,10,5,2,1} do

 aantal =0 
 while bedrag>= munt and aantal<5 do
    aantal=aantal+1
    bedrag=bedrag-munt 
 end while
 if aantal > 0 then
   printf(1,"%u x %u \n",{aantal,munt})   
 end if 

end for