INVOERSTROOM, 3 opgaven

20aug2025(an)
  1. {{TEL ... }}

    \ Tel het aantal tekens en woorden in een tekst met }} als afsluiter
    : {{TEL ( invoerstroom}} -- #tekens #woorden ) ... ;
    
    Hint: gebruik BL WORD en REFILL
    \ Voorbeeld
    {{TEL
    Het Egel-project bestaat uit ongeveer 50 eenvoudige voorbeelden
    van hardwarebesturing met noForth op de MSP430. In elk
    voorbeeld vindt u een bestand met Forth-code, documentatie
    en links naar meer informatie op internet. }}  ( 189 32 )
    
  2. {{SOM ... }}

    \ Bepaal de som van de getallen in een tekst met }} als afsluiter
    : {{SOM ( invoerstroom}} -- som van de getallen in de tekst) ... ;
    
    \ Voorbeeld
    {{SOM
    Etappes op de route Arnhem-Barcelona
    --- Nederland: Arnhem 0 km, Maastricht 156 km
    --- Belgie: Luik 37 km, Arlon 127 km
    --- Luxemburg: Luxemburg 47 km
    --- Frankrijk: Metz 53 km, Nancy 51 km
        Dijon 214 km, Lyon 189 km, Nimes 251 km
        Monpellier 46 km, Perpignan 150 km
    --- Spanje: Gerona 92 km, Barcelona 97 km }}  ( 1510 )
    
  3. C,, ...

    \ Doe een C, zolang het getallen zijn (geen afsluiter nodig)
    : C,, ( invoerstroom -- ) ... ;
    
    \ Voorbeeld
    C,, 1 2 3 5 8 13
    21 34 55 89 144 233 align \ klaar
    
    (* Het effect van dit voorbeeld is:
       1 c, 2 c, 3 c, 5 c, 8 c, 13 c,
       21 c, 34 c, 55 c, 89 c, 144 c, 233 c, align
    *)
Succes!