Программирование

Графические операторы

CLS – очищает экран дисплея;

COLOR N1,N2,N3-устанавливает цвет экрана ( N1-номеp цвета переднего плана, задается от 0 до 8; N2 – номер цвета фона, задается от 0 до 8; N3 – номер цвета знакоместа);

SCREEN N – переключение экранов N=0 или N=1 символьный экран; N=2 или N=3 графический экран;

PSET (N1,N2),N3 – окрашивание точки экрана в цвет N3,выбирается от 0 до 8, N1 координата Х, N2 координата Y;

PRESET (N1,N2),N3 – окрашивание точки в цвет фона;

LINE (N1,N2)-(N3,N4),N5,A – вычерчивание линии или прямоугольника, N1,N3 – координаты Х; N2,N4 – координаты Y; N5 – цвет от 0 до 8; если А=В то чертится прямоугольник, если А=BF, то закрашенный прямоугольник;

CIRCLE (N1,N2),N3,N4,N5,N6,N7 – вычерчивание окружности, эллипса или дуги, N1,N2 – координаты центра X и Y ; N3 – радиус; N4 – цвет от 0 до 8; N5 – положение начальной точки дуги в радианах; N6 – положение конечной точки дуги в радианах; N7 – коэффициент сжатия эллипса;

PAINT (N1,N2),N3,N4 – окрашивание части экрана в один цвет, N1,N2 – координаты X и Y начальной точки, N3 – цвет, N4 – цвет границы закрашиваемой области.

Начало и конец задачи

Для обозначения начала задачи или отделения одного блока программы от другого, для лучшей ориентации по программе или для обозначения подпрограмм используется оператор КОММЕНТАРИЙ: REM, после оператора в строке можно записать любой текст. Для обозначения окончания программы используется оператор END.

Практические задания в среде языка BASIC

Внимание! В тексте программ используется исключительно латинский шрифт, буквы и слова русского языка могут быть использованы в некоторых операторах в кавычках.

Задача 1: (линейный алгоритм)

а). Набрать текст программы, переходя в следующие строки, нажатием клавиши ENTER.

10 Q=5

20 Z=Q+8

30 PRINT Q,Z

40 END

б). Для просмотра записанного в память текста, выполнить команду LIST (F1).

в). Для исполнения записанной программы, выполнить команду RUN (F2).

г). В результате исполнения программы, на экране должен появиться ответ в виде двух чисел: 5 13

д). Очистить память ЭВМ от записанной программы, набрав в свободной строке и исполнив команду NEW. Очистить экран компьютера, набрав в свободной строке и исполнив команду CLS.

Задача 2: (линейный алгоритм)

а). Набрать текст программы, не забывая нажимать клавишу ENTER после каждой строки.

10 A=15

20 B=A/3+1

30 PRINT B

40 A=A+B

50 PRINT A,B

60 END

б). Просмотреть набранный текст, исполнив команду LIST.

в). Исполнить программу командой RUN.

г). Наблюдать на экране результат решения: 6 21 6

д). Очистить экран CLS, очистить память NEW.

Задача 3: (разветвленный алгоритм)

а). Набрать текст программы:

10 INPUT X

20 Y=SIN(X)

30 IF Y>0 THEN K=1 ELSE K=2

40 PRINT Y, K

50 END

б). Исполнить программу, выполнив RUN, при появлении на экране знака: ? , что означает запрос по команде INPUT на ввод числа с клавиатуры, набрать любое число и ввести его, нажав клавишу ENTER.

в). Наблюдать на экране результат решения в виде двух чисел, при этом, если первое из них положительно, то второе число будет равным 1, и наоборот, если первое число отрицательно, то второе равно 2.

г). Очистить память NEW и экран компьютера CLS.

Задача 4: (циклический алгоритм)

а). Набрать текст программы:

10 H=20

20 C=H-8

30 PRINT H, C

40 H=H-6

50 IF C>0 GOTO 20

60 END

б). Распечатать текст программы на экране.

в). Исполнить программу и наблюдать результат:

20 12

14 6

8 0

г). Очистить экран и память.

Задача 5: (разветвленный алгоритм)

Решить задачу с условием: подсчитать значение величины Y по формуле: Y=X²+А при X<0 и по формуле: Y=tg(X³)-sin(X/3)-А при X>=0.

а).Набрать текст программы:

10 INPUT “A, X=”;A,X

20 IF X>=0 GOTO 50

30 Y=X^2+A

40 GOTO 60

50 Y=TAN(X^3)-SIN(X/3)-A

60 PRINT “Результат=”,X,Y

70 END

б). Исполнить программу, при появлении на экране записи: A,X=? ввести с клавиатуры два числа через запятую и нажать клавишу ENTER.

в). Наблюдать результат в виде записи: Результат= с двумя числами, записанными с промежутком между ними.

г). Очистить экран и память ЭВМ.

Задача 6: (циклический алгоритм)

а). Набрать текст программы:

10 FOR X=0 TO 0.5 STEP 0.1

20 Y=10*X+5

30 PRINT X,Y

40 NEXT X

50 PRINT

60 PRINT “X=”,X

70 END

б). Исполнить программу и наблюдать на экране результат:

0 5

0.1 6

0.2 7

0.3 8

0.4 9

0.5 10

Х= 0.6

в). Очистить экран и память.

Задача 7: (циклический алгоритм, использование массива случайных чисел)

Заполнить массив размером 6 случайными числами в диапазоне от 0 до 10 и распечатать номер элемента массива и его значение.

а). Набрать текст программы:

10 DIM A(6)

20 FOR I=1 TO 6

30 A(I)=10*RND(1)

40 PRINT I,A(I)

50 NEXT I

60 PRINT “Индекс I стал равен:”,I

70 END

б). Исполнить программу и наблюдать результат:

в). Очистить экран и память.

Задача 8: (алгоритм, включающий условие и цикл)

Определить максимальное значение функции: Y=sin(X)+ln(X) в интервале значений аргумента от 1 до 3 с дискретностью 0.01 .

10 REM Программа

20 YMAX=0

30 GOSUB 60

40 PRINT XMAX,YMAX

50 END

60 REM Подпрограмма

70 FOR X=1 TO 3 STEP 0.01

80 Y=SIN(X)+LOG(X)

90 IF Y<YMAX THEN GOTO 120

100 YMAX=Y

110 XMAX=X

120 NEXT X

130 RETURN

Результатом решения будет два числа: значение аргумента, при котором функция имеет максимальное значение и значение функции.

Задача 9: (вычислить площадь области, заключенной между левым и правым пределами, верхней заданной функцией и снизу осью координат Х, как сумму площадей элементарных кусочков этой области).