Какво е 4-ти файл?
Файл с разширение .4th е програмен файл, създаден за Четвъртия език за програмиране. Той съдържа изходния код за програми, написани на езика за програмиране Forth, и генерира изхода, когато програмата се изпълни. Това е просто друг файл с език за програмиране, подобен на C и C++ изходен файл.
4-ти файлов формат - повече информация
Пример за код на 4-ти език за програмиране
Ето пример за проста програма, написана на Forth, която изчислява факториела на дадено число:
: 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 контролират потока на програмата.
За да използвате тази програма, трябва да въведете дефиницията в интерпретатора на Forth и след това да извикате факторна дума с числото, на което искате да намерите факториела:
10 factorial .
Това ще доведе до изхода 3628800, който е факториел от 10.