fork download
copy 
  1. \ Definisce la prima word
  2. : STAMPA-FRASE1 ( -- )
  3.   CR ." trov[à]sse un b[à]gno ti[è]pido "
  4. ;
  5.  
  6. \ Definisce la seconda word
  7. : STAMPA-FRASE2 ( -- )
  8.   CR ." al rit[ò]rno dalla batt[à]glia "
  9. ;
  10.  
  11. \ Inizia la sequenza di esecuzione delle word
  12. STAMPA-FRASE1
  13. STAMPA-FRASE2
  14.  
  15.  
Success #stdin #stdout 0.01s 5280KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
trov[à]sse un b[à]gno ti[è]pido 
al rit[ò]rno dalla batt[à]glia
https://ideone.com/slqHlG
language:
Forth (gforth 0.7.3)
created:
1 day ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!