Ошибки наших корреспондентов, авторов и верстки однообразны до чертиков. К тому же не так их много, чтобы я оправдал свою зарплату. С другой стороны, здесь, в "Компьютерре" мне понравилось. Люди в основном культурные, и столовая есть. Короче, назад улицу подметать не тянет. В виду чего я и напросился на повышение квалификации и сейчас отбываю срок на журфаке.

А вызвали меня оттуда вот зачем. В номере 25 (152) от 1 июля произошла совершенно из ряду вон выходящая плюха. В статье Александра Иглицкого 'Десять лет спустя..." примеры программ из книги заверстали как текст. Позволили своей версталке заполнить и выровнять строки. К тому же Иглицкий про книгу написал критически, отчего нам неловко вдвойне – и обругали, и сами же переврали.

Я, по правде, думал, господа на верстке не понимают, не программисты же. Пошел разбираться, а они мне говорят – ну что ж такого, структурный отступ порушили, а синтаксис правильный, и компилировать хоть сейчас можно. Такие они у нас крутые. Слов моих нет. Короче, вот эти программы, и пусть только попробуют хоть скобку переставить.

программа вСевероЗападныйУгол

процедура НаСеверДоУпора

! пока на севере свободно выполнять

! !шаг на север

! конец

конец

процедура НаЗападДоУпора

!

!пока на западе свободно выполнять

! !

! шаг на запад

! !

! конец

!

 конец

начало

!

! НаСеверДоУпора

!

! НаЗападДоУпора

!

конец

пока u выполнять

! k

!

конец

(UNARY_ADD(XY)

       (IF (CALL IS_NUMBER X)

         (IF (CALL IS_NUMBER Y)

           (EXPR X Y) (ABORT)

           (ABORT)

         )

         (ABORT)

     )

)

(IS NUMBER(X)

  (IF (EQUAL X (QUOTE))

    (QUOTE TRUE)

    (IF (EQUAL (FIRST X) (QUOTE I))

      (CALL IS_NUMBER (BF X))

      (QUOTE FALSE)