Двойная осторожность - страница 21
«LIST 10-140 10 PRINT „Какая из скачек в Эпсоме? Введите название скачки и нажмите „ENTER““.
20 INPUT A$ 30 IF А$=„Дерби“ THEN 330 40 IF А$=„Оукс“ THEN 340 50 IF А$=„Кубок Короны“ THEN 350 60 IF А$=„Голубая лента“ THEN 360»
И так далее, до конца экрана. Тед одобрительно проглядел все это и сказал:
— Проще простого.
Насколько я помнил, знак доллара означает, что ввозимая информация должна быть буквенной. Если бы там стояло «INPUT А», без знака доллара, это означало бы, что должны быть введены цифры. А дальше, в зависимости от того, какое слово ввели, предлагалось перейти к указанной строке.
Тед выглядел совершенно счастливым. Он напечатал «LIST 300–380», и получил следующее: в строке 330 стояло «LETA=10, В=8, С=6, D=2, Dl=2».
Строки 332, 334 и 336 выглядели точно так же, только цифры были другие.
— Это оценка, — сказал Тед. — Каждому ответу присваивается определенный балл. За первый вопрос — десять очков. Какой у нас был первый вопрос? Выигрывала ли лошадь скачки. И так далее. Ответу на последний вопрос тоже присвоено десять очков. Какой там был вопрос? Насчет предварительных шансов, да?
Я кивнул.
— Ну вот, — продолжал Тед. — Для каждой скачки — своя оценка. Хотя, конечно, для разных скачек вопросы могут варьироваться. Гм-гм. Посмотрим?
— Если у вас есть время…
— Ну конечно! Для апэпэшки время всегда найдется. Люблю я это дело, знаете ли.
Он снова напечатал «LIST» с другими номерами строк и обрел такие перлы, как 520 IF N$=«HET» THEN GOTO 560: X=X+B 530 INPUT N$: AB=AB+1 540 IF N$=«HET» THEN GOTO 560: X=X+M 550 T=T+G2 560 GOSUB 4000 — А это что за галиматья? — спросил я.
— Хм… ну… видите ли, написать свою программу куда проще, чем прочесть и понять чужую. Программы — вещь ужасно индивидуальная. К одному и тому же результату можно прийти совершенно разными путями. В смысле, если вы, к примеру, едете из Лондона в Бристоль, то вам нужна магистраль М-4, и она всю дорогу называется М-4, но в программе вы в любой точке пути можете назвать магистраль как вам заблагорассудится. Сами-то вы будете знать, что в определенный момент М-4 будет называться, скажем, К-2, или РТ-З, или В-7(2), но никто другой этого знать не будет.
— Это вы тоже детям так объясняете?
— Гм… да. Извините. Привычка. — Тед взглянул на экран. — Ну, видимо, вот эти строчки предназначены для того, чтобы пропускать отдельные вопросы, если предыдущие ответы сделали их ненужными, и переходить сразу в следующую часть программы. Если бы я распечатал всю программу, я мог бы понять, что тут к чему.
Я покачал головой:
— Не надо. Давайте лучше посмотрим какую-нибудь другую программу.
— Давайте.
Тед открутил пленку в начало и напечатал «Cload „Donca“», и когда на экране загорелось «ready», напечатал «run».
Нас немедленно спросили: «Какая из скачек в Донкастере? Введите название скачки и нажмите „ENTER“».
— Хорошо, — сказал Тед, нажимая на клавиши. — Как насчет того, чтобы посмотреть что-нибудь подальше? Скажем, «GOODW»?
Мы получили «Какая из скачек в Гудвуде? Введите название скачки и нажмите „ENTER“».
— Я не знаю, какие скачки есть в Гудвуде, — сказал я.
— Ну, это просто! — сказал Тед и напечатал «LIST 10-140». Когда экран перестал мигать, мы увидели следующее:
LIST 10-140 10 PRINT «Какая из скачек в Гудвуде? Введите название скачки и нажмите „ENTER“.
20 INPUT A$ 30 IF А$=„Приз Гудвуда“ THEN 330 40 IF А$=„Кубок Гудвуда“ THEN 340» и так далее.
Всего в списке было пятнадцать скачек.
— А что будет, если ввести название скачки, которой нет в программе? — спросил я.
— Давайте посмотрим, — сказал Тед. Он напечатал «run», и мы снова вернулись к «Какая из скачек в Гудвуде?» Тед напечатал «Дерби», и экран ответил: «По этой скачке информации не имеется».
— Дешево и сердито! — сказал Тед.
Мы проверили обе стороны каждой из кассет, но все программы были одинаковые: «Какая из скачек в Редкаре?», «Какая из скачек в Аскоте?», «Какая из скачек в Ньюмаркете?».
Там были программы примерно для пятидесяти мест, где проводятся скачки, с различным числом скачек в каждой. В некоторых программах были не названия конкретных скачек, а общие категории, вроде «Дистанция семь фарлонгов от трех лет и старше» или «Трехмильный стипль-чез по возрастным категориям». Я только потом сообразил — и меня это немало позабавило, — что среди этих скачек не было ни одного гандикапа. Там не было ни одного вопроса о том, сколько скачек выиграла лошадь под таким-то и таким-то грузом. В общем и целом эти программы были предназначены для расчета шансов любого количества лошадей в более чем восьмиста поименованных скачках и в неизвестном числе неназванных. У каждой скачки была своя система оценки и очень часто — свой список вопросов. Да, это был монументальный труд!