Обработка строк
Обработка текстовых данных в QBasic.
Массивы в QBASIC
Массивы. Обработка массивов в QBasic.
Под массивом понимают объединение переменных одного типа в единую структуру. Обращение к отдельным элементам в массиве осуществляется по индексу. Допустим, в программе необходимо 20 переменных для запоминания стоимостей каких-то товаров artprl,..artpr20. Переменные можно объявить следующим образом:
Dim artpi1!, artpr2!,......artpr20!
Ввод данных выглядит так:
INPUT "Artpri ",artpr1!
INPUT "Artpr 20 ",anpr20!
Перечень подобных примеров можно продолжить (вывод наименований товаров, суммирование цен, стирание старых цен и т.п.). Значительно удобнее в подобных случаях вместо 20 отдельных полей данных использовать массив из 20 элементов и отдельный элемент идентифицировать с помощью числового индекса. Причем индекс может изменятся, например, как переменная цикла. Массив объявляется командой DIM: DIM [SHARED] Переменная [Размерность]
В отличие от объявления простых переменных появляется новая спецификация — размерность. В ней указывается максимальное значение индекса массива.
Пример:
DIM artlkel$(1 T0 20)
DIM prels%(5 TO 10)
DIM alter%(18 T0 65)
'20 строковых элементов 1...20
'6 Integer-элементов 5...10
'48 Integer-элементов 18...65
В программе для выбора элемента из массива используется индекс.
Пример:
PRINT preis%(5)
'Выбор элемента массива с индексом 5
При программировании вышеописанного примера отчетливо видны преимущества применения массивов.
Пример:
'Упражнение с использованием массива
DIM artpr!(1 TO 20) 'массив цен
DIM 1% 'индекс-переменная
CLS
'Ввод цен для 20 наименований товаров
FOR i%-1 T0 20
PRINT "Ввести стоимость "; 1%; "-го товара";
'Ввод в элемемент массива с индексом 1% INPUT "",artpr(l%)
NEXT I %
'Вывод 20 наименований
CLS
'Вывод в строку
'суммы, количества, среднего значения, Max, Min
До сих пор мы рассматривали одномерные массивы. Но в QBASIC массив может иметь несколько индексов. Например, использование второго индекса позволяет обрабатывать двумерные таблицы. Трехмерный массив можно представить как куб. Можно описать массивы с четырьмя, пятью и более индексами. Максимально допустимое число индексов для одного массива — 255.
Пример:
'Использование трехмерных массивов
DIM zahl%(1 TO 10, 4 ТО 16, 6 ТО 30)
zahl%(1,5,23)=13
PRINTzahl%(1,523)
В этой главе рассмотрим функции, которые осуществляют обработку строк. В QBASIC функция состоит из имени и аргументов, которые заключаются в круглые скобки и располагаются всегда за именем функции. Значения функций обработки строк могут быть или типа STRING, или принадлежать к группе арифметических типов данных. Функции, наряду с переменными и константами, применяют в качестве составляющих оператора или используют при составлении выражений или логических условий. Естественно, зна- чение функции должно быть совместимо с остальными составляющими оператора, например, в арифметическое выражение нельзя встраивать функцию, значение которой является строковым выражением.