- •Среда программирования qbasic
- •Язык программирования qbasic
- •Типы данных
- •Виды данных
- •Имя константы (в неявном виде) или переменной
- •Оператор const
- •Оператор dim
- •Оператор присвоения значений переменным
- •Стандартные функции
- •Выражения
- •Арифметические выражения
- •Логические выражения
- •Операции сравнения
- •Логическое отрицание
- •Логическое умножение
- •Логическое сложение
- •Логическое равенство
- •Строковые выражения
- •Структура программ
- •Оператор ввода из памяти (read – data)
- •Вывод на экран (print) и принтер (lprint) Вывод данных на экран
- •Форматированный вывод на экран (print using) и принтер (lprint using)
- •Символы для вывода чисел
- •Алгоритмы
- •Действие 2
- •Операторы передачи управления по вычислению
- •Оператор условного перехода if then
- •Пример решения задач iia и iiб
- •Оператор выбора select case
- •Алгоритмы циклической структуры
- •Операторы цикла while – wend (цикл ‘’пока’’)
- •Операторы цикла do – loop
- •Операторы цикла for – next (цикл со счетчиком)
- •Итерационные циклы
- •Итерационные циклы с применением рекурентной формулы
- •Массивы в qbasic
- •Объявление массива
- •Действия с массивами
- •Функции и процедуры, определяемые пользователем (собственные)
- •Функция пользователя function
- •Объявление функции пользователя
- •Собственная процедура (подпрограмма) sub
- •Объявление подпрограммы пользователя
- •Формальные параметры делятся на 2 группы:
- •Операторы для работы с файлами
- •По принципу организации файлы подразделяются на:
- •Обработка файла состоит из следующих операций:
- •Создание дискового файла
- •Вывод данных в файл
- •Закрытие дискового файла
- •Ввод данных из файла в программу
- •Input # н.Ф., список
- •Функции, используемые при работе с файлами
- •Графические возможности qbasic
- •Выбор графического режима
- •Выбор цвета
- •Выбор окна выведения
- •Вывод точки на экран и ее удаление
- •Построение линии и прямоугольника
- •Построение эллипса (окружности)
- •Закрашивание замкнутых областей
- •Задание II Алгоритм разветвляющейся структуры задача iiа
- •Задача II б
- •Задание III алгоритм циклической структуры задача III а Табулирование функции
- •Задача III б Вычисление суммы (произведения)
- •Задание IV Алгоритм комбинированной структуры
- •Вариант решения (использование функции пользователя)
- •Вариант решения (использование подпрограммы пользователя)
Операторы цикла do – loop
Циклические действия выполняются до тех пор, пока выполняется определенное условие.
Формат оператора
1. Цикл ‘’ДО’’ ( выполняется не менее одного раза)
DO
[оператор 1]
... [EXIT DO]
[оператор n]
LOOP условие
2. Цикл ‘’ПОКА’’ (может не выполняться ни разу)
DO условие
[оператор 1]
... [EXIT DO]
[оператор n]
LOOP
Способы проверки условия:
WHILE – цикл выполняется, пока соблюдается условие (л.в. – истина)
UNTIL – цикл осуществляется, только если не выполняется условие (л.в. – ложь)
EXIT DO – преждевременно прерывает выполнение цикла. Работа продолжается с оператора, следующего за LOOP.
Цикл DO – LOOP может работать без проверки условий. В этом случае из бесконечного цикла можно выйти с помощью EXIT DO.
Пример 1 |
Пример 2 |
Пример 3 |
Z=-10 ’ цикл ''ДО'' DO T = ABS(Z) Z = Z +1 PRINT ’’T = ’’; T LOOP WHILE Z <= 0 {или LOOP UNTIL Z >0}
|
Z= - 10 ’ цикл ''ПОКА'' DO WHILE Z <= 0 или UNTIL Z > 0} T = ABS(Z) Z = Z +1 PRINT ’’T = ’’; T LOOP |
Z= - 10 DO T = ABS(Z) Z = Z +1 PRINT ’’T = ’’; T IF Z > 0 THEN EXIT DO END IF LOOP |
Операторы цикла for – next (цикл со счетчиком)
Этот цикл применяется для циклических вычислений с известным количеством повторений.
Формат оператора
FOR счетчик = N1 TO N2 [STEP N3]
оператор 1
. . .
[оператор n]
[EXIT FOR]
NEXT счетчик
Счетчик – числовая переменная, изменяющаяся при повторении цикла (управляющая переменная цикла, параметр цикла).
N1 – начальное значение счетчика – а.в., задает начальное значение параметра цикла.
N2 - конечное значение счетчика – а.в., задает конечное значение параметра цикла.
N3 – шаг – а.в. – приращение параметра цикла. По умолчании - шаг N3 = 1.
EXIT FOR – прерывание цикла. Программа выполняется с оператора, следующего за NEXT.
Пример 1 |
Пример 2 |
Z= - 10 ’ Табулирование функции FOR Z = - 10 TO 0 T = ABS(Z) PRINT ’’T = ’’; T NEXT Z |
S = 0 ‘ Вычисление суммы FOR I =1 TO 11 STEP 2 S = S+ (A+I)^2 NEXT I PRINT ’’S = ’’; S |
Вложенные циклы
Вычислить значение функции
, , ,
k =1, 2, 3,...,16, i =1, 3, 5,..., 21
REM вложенные циклы
DIM H, M, DL, i, AI, BK, Ci, Yi, S, K
INPUT ''H,M,DL’’; H,M,DL
FOR i = 1 TO 21 STEP 2
Ai = H + I : Ci = M ^ i
S = 0
FOR K = 1 TO 16
BK = DL *K : S = S + BK*Ci
NEXT K
Yi = Ai + S
NEXT i
PRINT ”S=”;S: END
Пример:
Вычислить значение функции yk = ak + bk3, k = 1, 3, …, 23,
при , xi = x0 + i Δ , i = 1, 2, …, k,