- •Среда программирования 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 Алгоритм комбинированной структуры
- •Вариант решения (использование функции пользователя)
- •Вариант решения (использование подпрограммы пользователя)
Оператор выбора select case
Оператор SELECT CASE предназначен для выполнения одного из альтернативных действий, перечисленных в нем. Выбор определяется значением управляющей переменной.
Формат оператора
SELECT CASE переменная
CASE сравнение 1
[ операторы 1]
[CASE сравнение 2
[ операторы 2]]
. . .
[CASE ELSE
[ операторы]]
END SELECT
CASE – сравнение в простейшем случае состоит только из одного выражения (например, из чисел или переменных). Однако можно включать списки выражений (выражение 1, выражение 2...) или целые области (выражение 1 TO выражение 2)
Если Сравнение 1 – ''истина'', то выполняются операторы 1, после чего, операторы, следующие END SELECT.
Если Сравнение 1 – ''ложь'', проверяется условие следующей ветви CASE.
Если ни одно из условий не выполняется, то выполняются операторы ветви CASE ELSE.
Значение переменной можно оценивать с помощью операторов сравнения, как в случае с условиями. Для этого после CASE используется ключевое слово IS, за которым следуют операции отношения или выражения.
Фрагмент программы |
Исходные данные |
Результат выполнения программы |
CONST Z = 10 Dim C INPUT “C”; C’ SELECT CASE С CASE 1,2 PRINT ’’значение С = 1 или 2’’ CASE 3 ТО 10 PRINT ’’значение С в интерв. от 3 до 10’’ CASE IS = 11 PRINT ’’значение С = 11’’ CASE IS < Z + 10 PRINT ’’значение С > 11 и < 20’’ CASE ELSE PRINT ’’инф. отсутствует’’ END SELECT |
при С = 1 |
значение С = 1 или 2 |
при С = 5 |
значение С в интерв. от 3 до 10
| |
при С = 11
|
значение С = 11 | |
при С = 15 |
значение С > 11 и < 20 | |
при С >20 |
инф. отсутствует |
Алгоритмы циклической структуры
Цикл – последовательность операторов, выполняемых многократно.
Цикл ''ПОКА'' Цикл ''ДО'' Цикл ''СЧЕТЧИК''
-
+
+
-
Цикл также можно сформировать с помощью операторов IF THEN и GOTO.
Операторы цикла while – wend (цикл ‘’пока’’)
Циклические действия выполняются, пока выполняется определенное условие.
Формат оператора
WHILE условие
оператор 1
. . .
оператор n
WEND
Пока выполняется условие, последовательно выполняются операторы 1 ÷ n.
WEND – закрывает цикл.
Если условие не выполняется с самого начала, то управление передается оператору, следующему за WEND, т.е. циклические действия не выполняются ни разу.
Необходимо следить, чтобы действия внутри цикла влияли на WHILE – условие.
К моменту первой проверки условия переменные, входящие в оператор, должны быть установлены соответствующим образом
Фрагмент программы |
Результат выполнения программы |
Z= - 5 WHILE Z <= 0 T = ABS(Z) Z = Z +1 PRINT ’’T = ’’; T; ''Z=”;Z WEND |
T = 5 Z = - 4 T = 4 Z = - 3 T = 3 Z = - 2 T = 2 Z = -1 T = 1 Z = 0 T = 0 Z = 1 |