Page 86 - 33

140 RETURN

170 J = 4

180 A$ = INPUT$ ( 1 ) : CLS
190 RETURN

У програмі перше звернення до підпрограми ( оператор 45 ) забезпечує
вивід повного варіанту “шапки ” разом із назвою таблиці. При повторному

зверненні ( оператор 70 ) виводиться її скорочений варіант, тобто без назви і

верхньої лінії. Підкреслювання кінця таблиці забезпечується оператором 85. До

речі, в рядку 180 одиниця в дужках означає необхідну кількість натискувань

для продовження виводу таблиці. Якби в дужках була цифра 5, то для

продовження знадобилося б п’ять натискувань.

Є ще один спосіб зупинки виводу ( або зупинки в будь-якому місці

програми ). Якщо треба передбачити лише зупинку програми, то для цього

достатньо у відповідному місці записати команду:

170 IF INKEY$ = “ ” THEN 170

Номер рядка може бути будь-яким, головне, щоб після THEN був той

самий номер. Тоді відбувається зациклювання і воно триватиме доки

користувач не натисне будь-яку клавішу. Якщо ж ми хочемо використати цей

оператор для почасткового виводу таблиці, тоді фрагмент від 170 до 190 має

бути таким:

170 IF INKEY$ = “ ” THEN 170

180 J = 4 : CLS

190 RETURN

Решта операторів залишається такою, як у попередньому варіанті. Для

звичайної зупинки роботи програми замість команди INKEY$ можна також

скористатись командою STOP. Як правило, її доцільно застосувати для

відладки великих програм, коли треба проаналізувати які-небудь проміжні

результати на певному етапі. Після відладки команда STOP видаляється і

програма вже працює без зупинки. Але незручність цієї команди полягає у

86