[an error occurred while processing this directive]
.шп1
Структурно неправильная программа выполняться не будет, а на экране появится список ошибок.
.шп0
То же самое можно получить с помощью прямой команды DEBUG, которая вызывает тест структуры программы и показ ошибок.
Введите
debug
и на экране появится такое же сообщение об ошибке. Чтобы исправить программу мы должны поместить обратно указание NEXT. Сейчас мы можем открыть еще одну свойство Комала.
Чтобы закончить указание NEXT, введите
40 next
Вы заметили, что мы не написали переменную go в конце указания?
Просмотрите программу.
Переменная цикла go была вставлена в строку 40. Если компьютер может сказать, что структура программы неправильная, то он сам может установить какая переменная должна идти за NEXT и вставить ее.
.шп1
Нет необходимости помещать переменную цикла в конце цикла. Компьтер сам определит эту переменную и автоматически ее вставит.
.шп0
Введите
debug
и сообщения об ошибке не будет.
.шп1
DEBUG сообщает о структурных ошибках в программе. Если нет ошибок, нет и сообщения.
.шп14
7.4 Табуляция вниз по экрану
.шп0
Дайте прямую команду CLS
и введите
print tab(10,15);"Here"
Обратите внимание, что подсказка и курсор появляются на строке, следующей за той, на которой было напечатано слово Here.
Сейчас введите
print tab(10,8); "There"
Сейчас курсор появляется на строке, следующей за There.
Первое число в команде TAB ( , ); - это позиция вдоль экрана, а второе - позиция вниз по экрану, с которой начинается печать.
Наш экран в данный момент имеет 32 строки от 0 до 31, начиная с нулевого ряда наверху.
Когда компьютеру говорят PRINT TAB(10,8);, он переходит в позицию 10 ряда 8 и начинает там печать.
Фактически - это одиннадцатый элемент в девятом ряду.
.шп1
PRINT TAB(a,d); - это команда начинать печать в позиции "а" вдоль экрана и "d" - вниз по экрану.
.шп14
7.5 Коды
.шп0
Компьютер показывает все символы, сохраняя в памяти их матрицы. Компьютер присваивает каждому символу число. Так как 'а' и 'А' имеют разную форму он присваивает им разные числа. Мы можем получить у компьютера эти числа.
Введите
cls
и
print ord("a")
Слово ORD происходит от ORDINAL, которое является математическим словом, означающим "числовое значение". Для буквы А кодовый номер - 65. Для работы ORD нужна строчная переменная, вот почему мы добавляем кавычки.
Введите
print ord("b")
ORD возвращает число, которое печатается в правой части зоны, если мы не пользуемся точкой с запятой. Если ORD применяется для строчной переменной, то выдается код первого элемента переменной.
Введите
x¤ := "ZEBRA"
и
print ord(X¤) // no quotation marks.
Набор заглавных латинских букв представляется серией чисел от 65 до 90. Мы можем найти коды и для строчных (нижнего регистра) букв вводом
print ord("A")
и
print ord("Z")
.шп2
Код ASCII
.шп0
Эти числа являются частью международного кода для символов, используемых в компьтерах. Это обеспечивает общение компьютеров на одном числовом языке. Этот код называется ASCII, абревиатура от американского названия American Standard Code for Information Interchange (Американский стандартный код для информационного обмена).
.шп1
ORD - это функция, которая возвращает код ASCII строчного элемента.
.шп14
7.6 Символы
.шп0
Мы очень просто можем сделать этот процесс обратным. Компьютер может сообщить нам символ, с которым он ассоциирует определенное число.
Введите
print chr¤(90)
.шп1
CHR¤ - это функция, которая возвращает символ, ассоциируемый с кодом ASCII.
.шп0
Даже цифра 5 имеет код ASCII.
Введите
print ord("5")
и
print chr¤(49)
и
print chr¤(48)
Обратите внимание, что CHR¤ возвращает строку. Числовые символы скорее являются строками, чем чистыми числами. Они печатаются в левой стороне зоны.
Введите new, а затем следующую программу.
10 cls 20 for code := 65 to 90 30 print chr¤(code), // note comma 40 next code
Запустите и просмотрите программу.
.шп2
Коды нижнего регистра
.шп0
Измените строку 20 на
20 FOR code := 97 TO 122
Запустите и просмотрите программу
.шп2
Числовые коды
.шп0
Измените строку 20 на
20 FOR code := 48 TO 57
и измените 30 на
30PRINT ;code,CHR¤ (code)
Запустите и просмотрите программу.
Когда вы удостоверитесь, что программа сработала, введите new и cls.
.шп14
7.7 Итоговые упражнения
.шп0
Запишите свои ответы и сверьте их с ответами в главе 43.
1. Какая команда напечатает слово here в третьем ряду с четырьмя пробелами перед ним?
2. Какая команда напечатает now в пятнадцатом ряду сверху с восмью пробелами перед ним?
3. Какая команда напечатает код ASCII для G?
4. Какая команда напечатает символ, чей код ASCII 70?
Составьте программы:
5. Для показа на верхних девяти рядах слово here с четырьмя пробелами перед ним.
6. Для показа на верхних девяти рядах целых чисел от 1 до 9 с четырьмя пробелами перед числами.
7. Для показа на верхних девяти рядах целых чисел от 1 до 9 с одним пробелом перед первым числоми так далее, пока перед девятым числом не будет девяти пробелов.
8. Для показа в начале рядов от 11 до 19 символов, чьи ASCII коды находятся в пределах от 81 до 89.
.шп14
7.8 Выводы
.шп0
1. CLS - команда очистить экран от всех текстов.
2. PRINT TAB(across); - команда печатать ту же самую строку в позиции, данной величиной across. Если позиция печати уже больше, чем across, то печать происходит в следующей имеющейся позиции.
3. Программа, которая структурно неправильна, не запустится, на экран будут выведены ошибки, обнаруженные предпусковым тестом.
4. Не нужно указывать переменную цикла после команды NEXT. Компьютер определит эту переменную и вставит ее автоматически, когда программа просматривается или запускается.
5. PRINT TAB(across,down); - команда печатать в позиции вдоль экрана в строке, данной величиной down.
6. CHR¤ - функция которая возвращает символ, чей код ASCII задан.
7. ORD - функция, которая возвращает код ASCII первого элемента ее строкового аргумента.
.сс
.шп6
8 РЕЖИМЫ И ТЕКСТОВЫЕ ЦВЕТА
.шп0
В этой главе мы будем использовать некоторые режимы и печатать в цвете.
.шп14
8.1 Выбор режима
.шп0
ПЭВМ АГАТ может показывать печать несколькими различными способами. Мы сами можем выбирать MODE (режим).
.шп1
MODE (режим) - это системная переменная, которую используют для выбора типа экранного показа. Ей может быть присвоена величина от 0 до 7. Мы можем найти ее , а также и присвоить ее. При просмотре MODE печатается заглавными буквами.
.шп0
Давайте посмотрим какой режим у нас сейчас.
Введите
print mode
Скорей всего вы получите 7. Диапазон имеющихся режимов - от 0 до 7, хотя модель 7 ПЭВМ АГАТ использует только режимы от 3 до 7.
.шп2
Отличительные черты режимов
.шп0
- Количество позиций в каждом ряду может быть 20, 32, 42, 64 или 84.
- Количество рядов может быть 16 или 32.
- Количество цветов, которыми вы можете создать фон может быть 1, 4 или 7.
- В некоторых режимах можно показать только текст, в других же, можно строить графики и рисовать картинки.
.шп2
Таблица режимов
.шп0
Режим 0 1 2 3 4 5 6 7 Позиции на строку 84 42 42 21 42 32 64 64 Количество строк 32 32 32 16 32 32 32 32 Текстовые цвета 2 4 4 8 2 8 2 2 Графика да да да да да нет нет нет
.шп2
Изменение режима
.шп0
Введите
mode := 5
Когда меняется режим, экран очищается. Подсказка может изменить форму и печать начинается с левого верхнего угла.
В режиме 5 есть восемь цветов, два из которых мы уже используем. Фон - черный, а подсказка и курсор показаны белым. Обратите внимание, что они больше чем были раньше.
Если вы пользуетесь черно-белым телевизором или монохромным дисплеем, то цвета будут появляться, как тона экрана.
Введите следующую программу, но не волнуйтесь, если печать будет продолжаться и на следующей строке. Строка и команда на ней все равно прочитаются компьютером, когда вы нажмете клавишу ВВОД.
100 mode := 5 110 colour 1 120 print "RED" 130 colour 2 140 print "GREEN" 150 colour 3 160 print "WHITE" 170 end
Запустите программу и просмотрите ее.
В режиме 5 читать программу не так просто, поэтому введите:
mode := 7
и просмотрите.
При смене режима программа не теряется. Строка 100 меняет режим, а также очищает экран.
.шп14
8.2 Функциональные клавиши
.шп0
В правой части клавиатуры ПЭВМ АГАТ есть несколько клавиш, обозначенных от 0 до 9 (обозначаются f0 - f9). Мы можем использовать эти клавиши для запоминания команд.
Введите прямую команду
*key 0 MODE := 6
Когда вводим эту команду указание MODE := 6 запоминается и выводится каждый раз, когда мы нажимаем клавишу f0.
Теперь нажмите клавишу f0. На экране должны появиться MODE := 6 и курсор. Указание было вызвано из памяти и показано.
Чтобы ввести эту команду, нажмите на клавишу ВВОД.
Можно ввести в память и символ, который представляет нажатие клавиши ВВОД. В этом случае, чтобы изменить режим, нам нужно будет нажать только на одну клавишу.
В правой части алфавитной клавиатуры есть клавиша, маркированная 'Э\'.
Когда в латинском режиме вместе с РЕГ нажимается эта клавиша, на экране появляется знак '|' (конечно, если у вас установлен знакогенратор с маленькими буквами, если нет, то этот символ можно увидеть в графических режимах).
В данной книге мы пользуемся знаком | для обозначения этой клавиши. Убедитесь, что между знаком | и m нет пробела.
*key 0 MODE := 6 |M
Символ | читается как "упр.символ" и, когда за ним следует m или М, имеет такое же значение, что и нажатие клавиши ВВОДE. Есть и другие управляющие коды, их полный список приводится в секции 40.2
Нажмите на клавишу f0.
Экран очистится после того, как там на короткое время появится и выполнится MODE := 6.
Сейчас введите
*key 0 MODE := 6 |m LIST |m
и нажмите клавишу f0.
.шп14
8.3 Номера цвтов
.шп1
COLOUR - это ключевое слово, которое используется для выбора цвета в котором выполняется печать (кроме монохромных режимов ).
.шп0
В двухцветном режиме (0, 4, 6, или 7) цвета нумеруются 0 или 1.
0 - черный цвет, а 1 - белый.
В четырехцветных режимах (1 или 2) цвета нумеруются от 0 до 3.
0 - черный, 1 - красный, 2 - зеленый, 3 - синий.
В восьмицветном режиме (3 или 5) цвета нумеруются от 0 до 7.
0 -черный, 1 - красный, 2 - зеленый, 3 - желтый, 4 - синий, 5 - фиолетовый, 6 - голубой и 7 - белый.
Программу легче читать, когда мы присваиваем эти номера переменным.
Введите дополнительные програмные строки как показано ниже:
10 red := 1 20 green := 2 30 yellow := 3
Вместо выбора COLOUR 1 мы можем изменить строку 110 на
110 COLOUR red
Запустите программу и посмотрите как это работает.
Сейчас нажмите на клавишу f0, чтобы получить более ясный вывод на экран.
Измените 130 на
130 COLOUR yellow
и 150 на
150 COLOUR white
А сейчас добавьте
40 black := 0 170 colour black 180 print "BLACK" 190 colour white 200 end
получаем программу
10 red := 1 20 yellow := 2 30 white := 3 40 black := 0 90 *key 0 MODE := 6 |m LIST |m 100 MODE := 3 110 COLOUR red 120 PRINT "RED" 130 COLOUR yellow 140 PRINT "YELLOW" 150 COLOUR white 160 PRINT "WHITE" 170 COLOUR black 180 PRINT "BLACK" 190 COLOUR white 200 end
Запустите программу.
Печать в черном цвете не видно, потому что фон тоже черный!
Нажмите клавишу f0 для смены режима и просмотрите программу.
.шп2
Фоновые цвета
.шп0
Добавьте строку 105
105 colour 129
и запустите программу опять.
Сейчас черные буквы видны, но красная печать на красном фоне плохо различима! Команда colour 129 сделала фон красным
Будет приятнее если весь фон экрана будет красным, а не те места, на которых мы печатали. Этого легко добиться, если мы очистим экран, потому что цвет, которым мы стираем экран всегда фоновый.
Нажмите клавишу f0, затем введите
107 cls
и запустите программу снова.
.шп1
Выбор номера цвета для COLOUR, который на 128 больше, чем его нормальная величина вызовет изменение фонового цвета. Этот способ работает только для печати, которая последует. Команда CLS заполнит экран этим цветом.
.шп0
Измените строку 105 на
105 colour 128 + black
и запустите программу снова.
Мы можем выбрать в качестве фонового цвета белый или желтый командами
colour 128 + white
или
colour 128 + yellow
Но предупреждаем. Читать белую печать на желтом, а желтую - на белом не просто.
.шп2
Возвращение к норме
.шп0
Если вы хотите вернутьться к нормальным цветам, белому на черном, то изменение режима переменит цвета и очистит экран.
Введите
mode := 6
.шп2
Использование восьми цветов
.шп0
Попробуйте команду
mode := 3
Введите
new
а затем измените режим на 6 и введите эту программу.
10 mode := 3 20 *key 0 mode := 6 |m list |m 30 for choice := 0 to 7 40 colour choice 50 print "Colour";choice 60 next choice
Запустите программу.
В режиме 3 номера цветов и их названия следующие:
0 Black (черн.) (Bk) 1 Red (красн.) (R) 2 Green (зел.) (G) 3 Yellow (желт.) (Y) 4 Blue (син>) (B) 5 Magenta (малин,) (M) 6 Cyan (голуб,) (C) 7 White (бел.) (W)
Нажмите функциональную клавишу f0 для смены режма и просмотра.
Если вы ввели строку 20 в нижнем регистре то ключевые слова не изменятся. Это исключение происходит с командами *.
Измените строку 50 на следующую,с 21 звездочкой.
50 print "*********************"
Запустите программу.
Почему между рядами звездочек получились свободные сроки?
Напечатав 21 звездочку, курсор переходит на следующую строку. Но, выполнив указание печати, он не встретил ни запятой, ни точки с запятой и перешел на следующую строку еще раз.
Нажмите функциональную клавишу f0, затем поместите точку с запятой в конце строки 50, получится:
50 PRINT "********************";
и снова запустите программу.
.шп14
8.4 Нет комментария
.шп0
После строки программы, содержащей команду *, нельзя добавлять комментарии с помощью //. Попытайтесь добавить комментарий к строке 20 и запустить программу.
Уберите комментарий из строки 20.
.шп14
8.5 TAB и COLOUR (Табуляция и цвет)
.шп0
Нажмите f0 и измените строку 50 на
50 print tab(8,choice);"*"
затем запустите программу и нажмите f0.
Измените строку 50 на
50 print tab(choice,choice);"*"
затем запустите программу и нажмите f0.
.шп14
8.6 Итоговые упражнения
.шп0
Предлагаемые ответы можно найти в главе 43.
Предположим, что вы используете режим 3:
1. Какая нужна команда, чтобы печать была красного цвета?
2. Составьте программу, используя цикл FOR... NEXT... , чтобы напечатать заглавные буквы алфавита вдоль экрана.
3. Какая команда изменит цвет печати на белый?
4. Соедините 1, 2 и 3, чтобы составить программу для печати алфавита красным цветом, и затем для замены цвета печати на белый.
5. Какие дополнительные указания необходимы для выполнения вопроса 4, но с желтым фоном.
Предположим, что вы используете режим 3:
6. Какая нужна команда для установки зеленого цвета печати?
7. Какая команда сделает фон всего экрана голубым?
8. Составтьте программу с циклом FOR... NEXT... для печати числа с 1 до 9 зеленым цветом на фоне голубого цвета. Числа необходимо напечатать колонкой в конце первой зоны. Затем необходимо изменить цвет печати на белый.
9. Какую команду необходимо ввести, чтобы при нажатии на функциональную клавишу f2 на экране появилось RENUMBER?
10. Какую команду необходимо ввести, чтобы при нажатии функциональной клавиши f2 программа в компьютере перенумеровалась?
11. Какую команду необходимо ввести, чтобы при нажатии функциональной клавиши f2 программа в компьютере перенумеровалась, а затем была показана на экране в режиме 6?
.шп14
8.7 Выводы
.шп0
1. MODE является системной переменной, которая управляет режимами экрана. Ей может быть присвоена величина от 0 до 7. Эта величина может быть напечатана как любая другая переменная. Пример: PRINT MODE.
2. COLOUR number - это команда для выбора цвета печати. Величину number можно выбрать из списка цветов, имеющихся для используемого режима.
3. COLOUR number + 128 устанавливает цвет фона печати в соответствии с цветом, данным величиной number в списке цветов для используемого режима.
4. Команда CLS создает фон выбранного цвета в зоне печати.
5. Команду *key можно использовать для хранения текстов, или контрольных кодов, чтобы при нажатии функциональной клавиши текст печатался как с клавиатуры.
6. Клавишу, маркированную знаком 'Э\', можно использовать с буквой m в указании *key для создания эффекта нажатия клавиши ВВОД.
7. В конце строки, содержащей команду *, нельзя помещать комментарии.
.сс
.шп6
9 Получение информации с клавиатуры
.шп0
В этой секции мы научимся вводить с клавиатуры величины с помощью ключевых слов INPUT, GET и GET¤.
Ведите следующую программу, которая вычисляет площадь прямоугольника.
100 mode := 6 110 length := 10 120 breadth := 5 130 print tab(5,8);"Area of a recctangle" 140 print tab(5,12);"If the length is " 150 prigt ;length;" cm" 160 print tab(5,14);"and the breadth is "; 170 print ;breadth;" cm" 180 area := length * breadth 190 print tab(5,16);"then the AREA is "; 200 print ;area;" sq cm"
и запустите ее.
Величины длины и ширины присвоены в программе. Новые величины можно присвоить, изменив строки 110 и 120. Однако мы не хотим переписывать программу каждый раз, когда нам нужен ответ на новый вопрос.
.шп14
9.1 Использование INPUT
.шп0
Выведите программу на экран и измените строку 110 на
110 input length
строку 120 на
120 input breadth
и добавьте
102 PRINT TAB(0,5);
Эти указания разрешают нам вводить любые числа для длины и ширины и вычислять площадь.
Запустите программу и прочитайте ее.
На экране появляется вопросительный знак. Это означает, что от нас ждут ввода. Напечатайте 12 и нажмите клавишу ВВОДE.
Число 12 было присвоено длине (LENGTH).
Опять появляется вопросительный знак. Опять от нас ждут ввода. Напечатайте 6 и нажмите ВВОД.
6 присвоено ширине (BREADTH) и программа завершена.
Запустите программу еще раз с другими значениями для длины и ширины.
.шп1
INPUT - это ключевое слово для ввода значений переменной с помощью клавиатуры. Вопросительный знак печатается, чтобы показать, что ожидается ответ.
.шп0
Программа работает очень хорошо, но нам нужно иметь огромную проницательность, чтобы догадаться, что от нас требуется этим вопросительным знаком.
.шп14
9.2 Подсказка INPUT
.шп0
Введите
105 print tab(5,3);"Length ";
и
115 print tab(5,5);"Breadth ";
Давайте опять запустим программу.
Теперь, кажется, все имеет больше смысла. Слова Length и Breadth (длина и ширина) оказались полезными подсказками.
Сейчас уничтожьте строки 105 и 115.
INRUT и подсказка могут быть объединены в одну команду.
В командах, приведенных ниже, двоеточие является основной частью синтаксиса.
Измените строки 110 и 120 на
110 INPUT "Length ":length 120 INPUT "Breadth ":breadth"
Запустите программу еще раз с новыми величинами для длины и ширины.
Вы обратили внимание, что в этот раз вопросительного знака не было? Если вы хотите подсказку в виде ? или >, впечатайте ее в сообщение о подсказке.
.шп1
Если в средине оператора INPUT есть сообщение о подсказке, то вопросительный знак не печатается. Между этим сообщением и переменной необходимо поместить двоеточие.
.шп0
Введите new и следующую программу:
10 total := 0 20 mode := 6 30 print tab(8,1);"Average of5 numbers" 40 for row := 1 to 5 50 print tab(10,row + 4); 60 input "Enter a number > ":number 70 total :+ number 80 next row 90 print tab(8,16);"The average is "; 100 print ;total / 5
Запустите программу несколько раз, сначала с очень простыми числами, которые вы можете проверить. Важно проверить, что программа компьютера ведет себя так, как вы и предполагали. Иногда ошибка в печати или логике может привести к непредвиденному. Компьютер всегда выполняет то, что вы ему сказали, пока он в состоянии это выполнять.
Строка 50 обеспечивает появление сообщения в средине экрана.
.шп14
9.3 Использование неправильного типа при вводе.
.шп0
Давайте посмотрим, что произойдет, если вместо цифры мы введем букву. Запустите программу еще рази нажмите буквенную клавишу, когда запрашивается длина.
Команда INPUT предполагает ввод цифры и отказывается от буквы. Появляется сообщение об ошибке; формат ввода испорчен, но нам предоставляется еще один шанс. Введите цифру и закончите программу.
.шп14
9.4 Строковый INPUT
.шп0
Мы можем использовать INRUT для строк, если заявим в операторе, что мы предполагаем строку.
Введите new, а затем программу.
10 mode :=6 20 print tab(0,5); 30 input "Please enter your name > ":name¤ 40 print tab(5,15);"Thank you ";name¤
Программа будет идти удовлетворительно при условии, что name¤ содержит не более 40 символов. Попробуйте.
Если мы хотим использовать более 40 символов, нам нужно сообщение DIM :
5 dim name¤ of 60
.шп14
9.5 Получение (GET) одного кода
.шп0
Иногда достаточно нажать только на одну клавишу, чтобы получить необходимую информацию. Для этого имеются ключевые слова GET и GET¤.
.шп1
x := GET - указание ждать нажатия клавиши. Код ASCII для этой клавиши в затем присваивается x (при условии, что мы не нажимаем клавишу РЕД).
.шп0
Введите new, а затем
10 mode :=6 20 print tab(5,7);"Press a key, please" 30 x := get 40 print tab(5,7);"The ASCII code is ";x
Запустите эту программу несколько раз. Обратите внимание, что в клавише ВВОД нет необходимостии символ клавиши не показан.
Чтобы решить, какая клавиша была нажата, мы можем использовать CHR¤( ).
Введите
50 print tab(5,9);"The key was ";chr¤(x)
Запустите измененную программу для проверки.
Просмотрите программу.
.шп14
9.6 Получение одного символа
.шп1
x¤ := GET¤ - указание ждать нажатия клавиши. Нажатая клавиша затем присваивается x¤ (при условии, что клавиша РЕД не нажата).
.шп0
Мы преобразовали нашу последнюю программу для использования GET¤.
Измените строку 30
30 x¤ := get¤
Введите
40 print tab(5,7);"The key was ";X¤
и
50 print tab(5,9);"Its code is ";ORD(X¤)
Просмотрите и запустите программу несколько раз.
.шп14
9.7 Итоговые упражнения
.шп0
Напишите программы, чтобы сделать следующее:
1. Введите два числа и напечатайте их сумму и произведение.
2. Возьмите длину, ширину и высоту прямоугольного блока и напечатайте его объем.
3. Измените программу 2 так, чтобы она дала и площадь поверхности.
4. Введите величины p,r, и t и примените формулу
i - p*r*t/100
для вычисления величины i. Это способ вычисления дохода от основной p, при годовых r% в течение t лет.
5. Какие поправки необходимо внести в среднюю программу в разделе 9.2 для того, чтобы вас спросили "How many numbers are there?" (сколько имеется чисел?) и компьютер вводит количество чисел, числа и дает их среднее значение.
Сверьте ваши решения с данными в главе 43.
.шп14
9.8 Выводы.
.шп0
1. INPUT x заставляет компьютер печатать вопросительный знак и ожидать ввода числа. Число присваивается переменной x, Присваивать которое ранее не было необходимости.
2. INPUT x¤ заставляет компьютер печатать вопросительный знак и ждать ввода строки. Строка присваивается переменной x¤, присваивать которую ранее не было необходимости (при условии, что длина строки больше чем 40 символов, в случае чего необходимо указание на размер DIM).
3. Быстрое сообщение можно поместить в кавычках после INPUT и перед переменной. Пример: INPUT "Postcode > ":=p¤.
Между подсказкой и переменной необходимо ставить двоеточие.
При выполнении команды вопросительный знак не печатается.
4. TAB( ); и INPUT не могут быть объединены в одном и том же указани. Если вы хотите произвести вывод на какое-то определенное место на экране, то необходимого результата можно достичь с помощью PRINT TAB(a,b); и указанием INPUT.
5. Когда ввод производится с клавиатуры, x := GET присваивает переменной x код ASCII для символа, который нажимается следующим на клавиатуре (при условии, что клавиша РЕД не нажата).
6. Когда ввод производится с клавиатуры, x := GET¤ присваивает переменной x¤ символ клавиши, которая нажимается следующей (при условии, что клавиша РЕД не нажата).
.ст комал6
[an error occurred while processing this directive]