Differences

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

Link to this comparison view

forth-1-trabalho [2012/03/19 23:23]
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)+    : contagem regressiva  
 +    BEGIN 
 + DUP CR (valor da duração do LOOP) 
 + 1 – DUP < 0 (até for menor que zero) 
 +    UNTIL 
 +    ;
  
  
- ELSE(retorna falso)+**DO...LOOP – vai imprimir “Ba” seguido de 4 “Na”** 
 +    : SPELL 
 +     . “Ba” 
 +     4 0 DO 
 +                . “Na” 
 +            LOOP 
 +    ;
  
  
- THEN. +**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.1332210198.txt.gz · Last modified: 2012/03/19 23:23 by clp · [Old revisions]