Differences

This shows you the differences between two versions of the page.

Link to this comparison view

forth-1-trabalho [2012/03/19 23:31]
clp [Condicionais:]
forth-1-trabalho [2012/03/19 23:49] (current)
clp [Ultimas palavras]
Line 109: Line 109:
  
  
-===== Condicionais======+===== Condicionais ======
 **IF-ELSE-THEN** **IF-ELSE-THEN**
  
-'' +   : L (valor) 
-: L (valor) +       0 < (testa se o valor e menor que zero) 
- +       IF. (retorna verdadeiro) 
 +       ELSE. (retorna falso) 
 +       THEN. 
 +   ; 
 +    
 +    
 +**CASE** 
 +   : Caso_de_teste 
 +         CASE 
 +            0 OF. ENDOF 
 +            1 OF. ENDOF 
 +            2 DE ENDOF 
 +            DUP. . "Entrada inválida!" 
 +         ENDCASE CR 
 +   ; 
 +    
 +    
 +===== Loop ======
  
  
-        0 < (testa se o valor e menor que zero) +**BEGIN...UNTIL** 
-        IF(retorna verdadeiro) + 
-  ELSE. (retorna falso+    : contagem regressiva  
- THEN. +    BEGIN 
-+ DUP. CR (valor da duração do LOOP) 
-''+ 1 – DUP (até for menor que zero) 
 +    UNTIL 
 +    ; 
 + 
 + 
 +**DO...LOOP – vai imprimir “Ba” seguido de 4 “Na”** 
 +    : SPELL 
 +     “Ba” 
 +     4 0 DO 
 +                . “Na” 
 +            LOOP 
 +    ; 
 + 
 + 
 +**BEGIN WHILE REPEAT** 
 + 
 +    :função  (soma de N inteiros
 +     Value 0 
 +     BEGIN 
 +     OVER 0>
 +     WHILE 
 +     OVER + 
 +     SWAP 1 - 
 +     REPEAT 
 +     SWAP 
 +    ; 
 + 
 +===== Ultimas palavras ====== 
 + 
 +O trabalho foi feito a principio para que as pessoas tenham um leve conhecimento de como e a história da linguagem FORTH, desde sua área de atuação até mesmo a alguns comandos básicos. 
 + 
 +**Referências** 
 + 
 +[[http://www.forth.org]] 
 + 
 + 
 +[[http://www.softsynth.com/pforth/pf_tut.php#Defining a New Word]] 
 + 
 +[[http://www.forth.org/bournemouth/forth.html#2]]
 
forth-1-trabalho.1332210689.txt.gz · Last modified: 2012/03/19 23:31 by clp · [Old revisions]