Четвертый файл — формат файла языка Forth

Что такое 4-й файл?

Файл с расширением .4th представляет собой файл программирования, созданный для языка программирования Forth. Он содержит исходный код программ, написанных на языке программирования Форт, и генерирует выходные данные при выполнении программы. Это просто еще один файл языка программирования, похожий на исходный файл C и C++.

Четвертый формат файла – дополнительная информация

Пример кода четвертого языка программирования

Вот пример простой программы, написанной на Форте, которая вычисляет факториал заданного числа:

: factorial ( n -- n! )
   dup 0=
   if
      drop 1
      exit
   then
   1
   swap
   begin
      dup 1-
      dup 0=
      if
         drop
         exit
      then
      swap
      *
   repeat
;

В этом примере слово факториал принимает один аргумент n и возвращает его факториал. Слово dup дублирует значение на вершине стека, слово drop отбрасывает значение на вершине стека, а * умножает два значения на вершине стека. Конструкции if иbegin/until управляют ходом программы.

Чтобы использовать эту программу, вы должны ввести определение в интерпретатор Форта, а затем вызвать слово-факториал с номером, для которого вы хотите найти факториал:

10 factorial .

Результатом будет 3628800, который является факториалом 10.