Cтраница 5
Следующая программа иллюстрирует использование обеих функций. Она сжимает табулированные данные, заменяя последовательность пробелов на двоеточие. [61]
Следующая программа читает карты, извлекает поля ИМЯ и АДР, располагает их должным образом и перфорирует новую колоду. [62]
Следующая программа использует POS, RPOS, SPAN и BREAK для распечатки карт, не удовлетворяющих заданному формату. Поле не должно содержать больше девяти литер, отличных от пробела. [63]
Следующая программа похожа на предыдущую, только она ищет общие литеры, а не слова. Литеры извлекаются из первой цепочки с помощью образца ЛИТ. В образце НАЙТИЛ невычисляемое выражение Л служит параметром функции BREAK-При использовании НАЙТИЛ прерывающей литерой служит текущее значение Л, полученное во время сопоставления с образцом ЛИТ. [64]
Следующая программа имеет то же значение, что и первая, однако здесь используется более тонкий метод, и вся работа выполняется значительно быстрее. [65]
Следующая программа демонстрирует использование всех трех функций-операторов, определенных выше. [66]
Следующая программа показывает, как используется поиск с возвратом для выполнения повторяющихся операций. [67]
Следующая программа, записанная в псевдокодах, строит заполняющее множество Жюлиа. [68]
Следующая программа, представленная группой маркетинга, называлась Просто как 12 3 4, которая позволяла клиентам обналичивать свои чеки в любом из 1234 отделений Монреальского банка в Канаде. [69]