Язык программирования Форт



         

Полезная программа


Хотя из соображений удобства мы знакомим вас с языком Форт на примере арифметических операций, нужно подчеркнуть, что компьютеры приносят большую пользу не только в математике. Например, рукопись этой книги была подготовлена с помощью программы обработки текстов, написанной на языке Форт. Одно из наиболее полезных применений компьютера состоит в преобразовании огромного количества данных в такую форму, которая легче воспринимается человеком. В частности один из лучших способов -- представление данных в графической форме. Несмотря на то, что многие языки программирования (включая некоторые версии Форта) имеют множество сложных графических команд, одним из наиболее распространенных способов представления графических данных является "быстрый и грубый" график, построенный из прямых линий или столбиков. Возможно, вы привыкли к представлению столбиков в виде сплошных вертикальных прямоугольников, однако неплохо выглядят также столбики, построенные из рядом стоящих букв, которые печатаются по горизонтали. Например,

хххххххххх ххххххххххххх ХХХХХХХХХХХХХХХХ ххххххххххх ххххххх

представляет собой вполне наглядную гистограмму. Мы проследим весь процесс составления программы для построения подобной гистограммы, а затем рассмотрим ее с точки зрения структуры Форта, после чего вы сможете модифицировать программу в следующей серии упражнений. В самом начале определим слово

: TASK ;

TASK -- это слово, которое ровным счетом ничего не делает, кроме того, что помечает позицию в словаре. Но если ввести

FORGET TASK

то слово TASK будет удалено из словаря вместе со всеми теми словами, которые были определены после слова TASK. Поэтому, если вы сделали ошибку в программе и хотите.начать ее сначала, достаточно ввести

FORGET TASK

чтобы снова оказаться в том месте, с которого вы начали. Считается хорошей манерой начинать программу с подобного, не имеющего другого смысла слова, обычно для этого используется именно слово TASK.

Теперь нам нужно описать слово, которое будет печатать на экране строку литер "X" или "столбик".


Содержание  Назад  Вперед