Информатика и программирование

Турбо Бейсик допускает чтение числовой константы в строковую переменную. Например:

DATA 153.4

READ B75$

Оператор RESTORE (RESTORE ? восстановить) служит для перехода к начальному значению первого оператора DATA. То есть это оператор восстановления. При его выполнении ввод данных будет осуществляться, начиная с первого элемента в первом операторе DATA. Например:

DATA 1,2,3,4,5,6

READ A,B,C,D

RESTORE

READ E,G

После выполнения первого оператора READ A=1, B=2, C=3, D=4, после выполнения второго оператора READ E=l, G=2.

Операторы вывода PRINT, LPRINT. Оператор PRINT (PRINT ? печать) выводит числовые и строковые переменные, числа, значение арифметических выражений, а также текст, заключенный в кавычки на экран дисплея. Например:

PRINT X,Y

PRINT A$

PRINT "IBM PC"

PRINT 4+3

PRINT B*C?E

В первом случае будет выведено на дисплей значение числовых переменных X и Y, во втором ? значение строковой переменной А, в третьем ? текст «IBM PC», в четвертом ? результат сложения двух чисел ? 7, в пятом ? результат арифметического выражения.

Если элементов в списке оператора PRINT несколько, то они между собой разделяются «,» или «;». Если в качестве разделителя используется «,», то данные выводятся по зонам, каждая из которых состоит из 16 позиций. Например, после выполнения

PRINT 1,2,3,4

на экран дисплея будет выведено сообщение:

1 2 3 4

Если между элементами стоит «;», то осуществляется последовательный вывод данных без пробелов. Например, после выполнения

PRINT 1;2;3;4;

на экран дисплея будет выведено сообщение:

1 2 3 4

Разделители можно ставить после последнего элемента, что позволяет определить расположение первого элемента последующего оператора вывода. Например, после выполнения операторов

PRINT 1000,"При";

PRINT "соединение"

на экран дисплея будет выведено сообщение:

1000 Присоединение

Расположение операторов при выводе, кроме разделителей может определяться специальными функциями TAB (TABulation ? табуляция) и SPC (SPaCe ? пробел). Эти функции задаются в списке выражений.

Функция TAB определяет номер позиции, с которой должен выводиться элемент, стоящий за данной функцией. Если позиция, определяемая функцией, меньше текущей, то функция игнорируется. Например, при выполнении оператора

PRINT A,TAB(6),В;ТАВ(25),С

значение А будет выведено с первой позиции. Вслед за переменной А стоит запятая. После вывода А вывод В может начаться с 17-й или более дальней позиции. Поскольку в первой функции TAB стоит число меньше 17, то данная функция игнорируется. Поэтому переменная В выводится с 17 позиции. Переменная С выводится с 25 позиции, указанной во второй функции TAB.

Функция SPC пропускает заданное число пробелов. Например, при выполнении оператора

PRINT A;SPC(12);В

после вывода значения переменной А будет пропущено 12 пробелов.

Для вывода данных на устройство печати используется оператор LPRINT. Данный оператор выполняет те же действия, что и оператор PRINT.

Оператор безусловного перехода GOTO. Оператор безусловного перехода GOTO (GO TO ? перейти к) употребляется для перехода к заданной метке или к выполнению строки с заданным номером. Например:

GOTO M1

GOTO 100

В первом операторе задан переход к метке M1, во втором ? к оператору с номером 100.

Оператор условного перехода IF. Оператор IF (IF ? если) служит для изменения порядка выполнения операторов в зависимости от условия. В качестве условий используются операции сравнения и логические операции. Операции сравнения бывают = (равно), < (меньше), > (больше), >= или => (больше или равно), <= или =< (меньше или равно) <> или >< (неравно). Можно использовать следующие логические операции (в порядке приоритета): NOT (отрицание), AND (конъюнкция), OR (дизъюнкция), XOR (исключающая дизъюнкция), EQV (эквивалентность), IMP (импликация). Результаты выполнения логических операций приведены в табл. 4.2.

Таблица 4.2 Результаты выполнения логических операций

Примечание. В таблице 1 ? обозначает «истина», 0 ? «ложь»,

Оператор IF может быть представлен в одном из видов:

IF <условие> THEN <оператор> [ELSE <оператор>]

IF <условие> GOTO <метка или номер строки> [ELSE <оператор>]

Часть оператора, начиная со слова ELSE, может быть опущена.

Если условие, заданное оператором IF, выполняется, то выполняется оператор, следующий за THEN (THEN ? тогда) или передается управление строке указанной GOTO (GOTO ? перейти к). Когда условие не выполняется, то выполняется оператор, стоящий за ELSE (ELSE ? иначе). Если в операторе опущено ELSE, то управление передается следующей строке. Например:

IF X>Y THEN X=0 ELSE X=Y

IF A>0 AND B>0 GOTO 200

В первом операторе при выполнении условия X>Y, X будет присвоено значение равное 0, в противном случае, ? значение равное Y. Во втором операторе, если А и В будут одновременно больше 0, то произойдет переход к оператору с номером 200, если данное условие не будет выполнено, то ? к следующему оператору.

Оператор вычисляемого перехода ON. В отличие от оператора условного перехода оператор вычисляемого перехода ON (ON ? при) может осуществлять переход не по двум направлениям, а по нескольким в зависимости от значения арифметического выражения или числовой переменной. Общая форма записи оператора:

ON <выражение> GOTO N₁, N₂, …, N_к

Арифметическое выражение (числовая переменная) подбирается таким образом, чтобы часть его принимала значения 1, 2, ..., к. Если его значение равно 1, то осуществляется переход к строке с номером N₁ или к метке N₁, если равно 2, то к строке с номером N₂ или к метке N₂ и т. д. Например:

ON В GOTO 60,400,300,200

При В=1 осуществляется переход к строке 60, при В=2 ? к строке 400, при В=3 ? к строке 300, при В=4 ? к строке 200.

Один оператор вычисляемого перехода заменяет в данном случае 4 оператора условного перехода:

IF B=l GOTO 60

IF В=2 GOTO 400

IF B=3 GOTO 300

IF B=4 GOTO 200

Операторы цикла FOR/NEXT и WHILE/WEND. Для организации циклов используются две группы операторов: операторы задающие автоматически приращающийся (отрицательно приращающийся) цикл и операторы, строящие цикл, в котором проверка выполняется (по условию) на входе.

Для организации автоматически приращающийся циклов используются операторы заголовка цикла FOR I=A ТО В STEP С (FOR ? от, ТО ? до, STEP ? шаг) и конца цикла NEXT I (NEXT ? следующий).

В этих операторах I ? переменная (параметр цикла), А ? начальное значение переменной I, В ? конечное значение переменной I, С ? шаг изменения переменной I. Если шаг С равен 1, то STEP можно не использовать. Параметры А, В, С могут задаваться арифметическими выражениями.

При выполнении операторов цикла меняется значение переменной I на величину С и сравнивается с величиной В. Если значение I превысит значение В, то происходит выход из цикла.

Например, необходимо ввести 10 значений величины X и вычислить корень квадратный. Результаты вывести на экран дисплея. В этом случае программа запишется в следующем виде:

FOR I=1 ТО 10

INPUT X

PRINT SQR(X)

NEXT I

Другой пример. Требуется возвести в квадрат четные числа от 2 до 20. Программа будет иметь вид:

FOR A=2 ТО 20 STEP 2

PRINT A^2

NEXT A

Для организации циклов по условию используются операторы начала цикла WHILE <условие> (WHILE ? пока) и конца цикла WEND (While END ? конец цикла WHILE).

При выполнении операторов цикла проверяется заданное оператором WHILE условие. Если оно выполняется, то выполняются все операторы, находящиеся между операторами WHILE и WEND. Затем управление передается оператору WHILE и если условие выполняется, то снова выполняются внутренние операторы. Это повторяется до тех пор, пока условие заданное WHILE не будет выполнено. В этом случае происходит выход та цикла.

Например, при записи цикла по условию программа вычисления корней квадратных из 10 значений X запишется следующим образом:

LET I=1

WHILE I<=10

INPUT X

PRINT SQR(X)

LET I=I+l

WEND

А программа возведения в квадрат четных чисел от 2 до 20 примет вид:

LET А=2

WHILE А<=20

PRINT A^2

LET A=A+2

WEND

Оператор описания массивов DIM. Оператор DIM (DIMension ? размеры) служит для описания числовых, строковых массивов и резервирования для них места в памяти машины. Под массивом, в отличие от простой переменной, понимается набор переменных, которые имеют общее обозначение.

Например, оператор

DIM А(20),Bl%(9),C$(4),E#(2,3)

описывает массив вещественных переменных одинарной точности из 21 элемента А(0), А(1),..., А(20), массив целочисленных переменных, состоящих из 10 элементов В%(0), В%(1), ..., В%(9), массив строковых переменных, состоящих из 5 элементов C$(0), C$(1), ..., C$(5) и двухмерный массив вещественных переменных двойной точности, состоящий из 3 строк и 4 столбцов:

Е#(0,0), E#(0,l), Е#(0,2), E#(0,3),

Е#(1,0), E#(1,l), Е#(1,2), E#(1,3),

Е#(2,0), E#(2,l), Е#(2,2), E#(2,3).

В качестве индекса в элементах массива допускается использование любого арифметического выражения. Например, E(2*I+1,J). При этом если результат получается дробным, то в качестве индекса берется целая часть числа.

Обработка массивов ведется поэлементно. Например, формирование массива Е можно осуществить с помощью операторов:

DIM Е(2,3)

FOR I=0 ТО 2

FOR J=0 TO 3

LET E(I,J)=I*J

NEXT J

NEXT I

Оператор связи программы с подпрограммой GOSUB. При составлении программы на языке Бейсик могут использоваться подпрограммы, допускающие многократное обращение к ним из различных точек программы. Использование подпрограмм уменьшает общее количество операторов в программе и, следовательно, требует меньше памяти для размещения программы.

Подпрограмма может начинаться с любого оператора, а должна заканчиваться оператором возврата RETURN (RETURN ? возврат). Обращение к подпрограмме осуществляется с помощью оператора GOSUB N (Goto SUBroutine ? перейти к программе), где N -- номер строки, с которой начинается подпрограмма. Подпрограммы обычно размещаются в конце программы. Например, при выполнении программы необходимо неоднократно выводить массив данных А, состоящий из 21 числа. В таком случае программа запишется в следующем виде:

DIM А(20)

GOSUB Label

GOSUB Label

Label:

FOR I=0 TO 20

PRINT A(I)

NEXT I

RETURN

Подпрограмма может содержать обращение к другим подпрограммам. При этом внутренняя подпрограмма является вложенной.

Оператор выбора подпрограмм ON GOSUB. Оператор ON GOSUB используется для условного перехода к одной из подпрограмм или к одной из нескольких входных точек подпрограмм. Общая форма записи оператора:

ON <выражение> GOSUB N₁,N₂,…,N_к

Переход к подпрограммам с метками N₁, N₂, …, N_к осуществляется в зависимости от арифметического выражения или значения переменной, которые могут принимать значения 1, 2, ..., к. Например:

ON SQR(X) GOSUB MET1,MET2,МЕТЗ

Если целая часть SQR(X) будет равна 1, то управление передается подпрограмме, начинающейся с метки МЕТ1, если ? 2, то с метки МЕТ2, если ? 3, то с метки МЕТЗ.

Оператор ON GOSUB позволяет передавать управление в любую точку подпрограммы.

Оператор конца выполнения программы END. Оператор конца выполнения программы служит оператор END (END ? конец). Оператор END ставится в любом месте программы. Причем их может быть несколько. При встрече с данным оператором программа прекращает работу.

Оператор END не является обязательным. В программе его можно опускать.

Рекомендуемая литература

1. Информатика: Учебник / Под ред. Н.В. Макаровой.? М.: Финансы и статистика, 2002.

2. Информатика: Учебное пособие / Под ред. А.П. Курносова.? М.: КолосС, 2005.

3. Практикум по информатике: Учебное пособи /Под ред. А.А. Землянского.? М.: КолосС, 2003.

4. Информатика: Практикум по технологии работы на компьютере: Учебное пособие / Под ред. Н.В. Макаровой.? М.: Финансы и статистика, 2002.

Дополнительная

1. Аладьев В.З., Хунт Ю.Я., Шишаков М.Л. Основы информатики: Учебное пособие.? М.: Филинъ, 1998.

2. Могилев А.В., Пак Н.И., Хеннер Е.К. Информатика: Учебное пособие.? М.: Академия, 1998.

3. Основы информатики: Учебное пособие / А.А. Морозевич, Н.Н. Говядинова и др.? Мн.: Новое знание, 2001.

4. Шичков Л.П. Основы информатики и информационных технологий: Учебное пособие.? М.: РГАЗУ, 2002.

5. Веретенникова Е.Г., Патрушина С.М., Савельева Н.Г. Информатика.? Ростов н/Д: МарТ, 2003.

6. Лабораторный практикум по информатике: Учебное пособие / Под ред. В.А. Острейковского.? М.: Высшая школа, 2003.

7. Каймин В.А. Информатика: Учебник для вузов.? М. ИНФРА-М, 2003.

8. Яковлев В.Б. Математическая обработка данных в дипломных работах на персональных ЭВМ.? М.: РГАЗУ, 2003.

9. Яковлев В.Б. Статистика. Расчеты в Microsoft Excel: Учебное пособие.? М.: КолосС, 2005.

10. Яковлев В.Б. Турбо Бейсик для IВМ РС: Учеб. пособие.- М.: ВСХИЗО, 1993