<= КОНСУЛЬТАНТ => Электронный справочник по ИНФОРМАТИКЕ (Автор Панов В.А.)

		Электронный мозг будет думать за нас точно так же, как электрический стул за нас умирает.

Основы работы в QBasic

Оператор безусловного перехода

Операторы условного перехода

Условная конструкция SELECT...CASE

Оператор цикла FOR...NEXT

Оператор цикла WHILE...WEND

Оператор цикла DO...LOOP

Массивы

Работа с символами

Условная конструкция SELECT CASE

SELECT CASE — управляющий оператор, выполняющий один из нескольких блоков операторов в зависимости от значения выражения.

Синтаксис:			Пример:
SELECT CASE выражение_выбора			INPUT “X=”; X
	CASE [список_выражений_1]		SELECT CASЕ X
		[операторы_1]		CASE 1, 3, 5, 7, 9
	CASE [список_выражений_2]				PRINT "Нечетное"
		[операторы_2]		CASE 2, 4, 6, 8
	. . .				PRINT "Четное"
				CASE IS < 1
					PRINT "Очень маленькое"
	CASE ELSE			CASE IS > 9
		[операторы_N]			PRINT "Очень большое"
END SELECT				CASE ELSE
					PRINT "He целое значение"
			END SELECT

выражение выбора — любое числовое или символьное выражение;

список выражений — одно или более выражений такого же типа, как и выражение выбора. Ключевое слово CASE должно предшествовать блоку операторов;

операторы — содержат любое количество операторов.

Элементы списка выражений должны иметь одну из следующих трех форм:

выражение[выражение...];
выражение TO выражение;
IS выражение с операцией.

• выражение — любое числовое или символьное выражение того же типа, что и выражение выбора;

• операция — любая из следующих операций:

<
<=
>
>=
<>
=

меньше;
меньше либо равно;
больше;
больше либо равно;
не равно;
равно

Если выражение выбора отвечает условиям списка выражений данного блока CASE, выполняются операторы из этого блока.
После этого управление передается оператору, следующему за END SELECT.

Если вы используете ключевое слово TO для определения пределов выражения, то меньшее значение должно быть первым.
Например, операторы блока CASE - 1 TO - 5 не выполняются, если выражение выбора равно -4.
Эта строка должна быть написана как CASE - 5 TO - 1.

Операции сравнения можно использовать только с ключевым словом IS.

Блок операторов CASE ELSE выполняется только в том случае, если выражение выбора не удовлетворяет ни одному из условий CASE.
Обычно используется для обработки нежелательных значений.

Если нет блока операторов CASE ELSE и нет ни одного выражения в условиях CASE, программа выполняется без ошибок.

Можно использовать несколько выражений или пределов в каждом условии CASE.

CASE 2 TO 4, 7 TO 9, 11, 13, IS > 75

Это же справедливо и для символьных выражений:

CASE "трактор", "ЭЭЭЭ" TO "ЯЯЯЯ", Testltem$

Здесь CASE выбирает те строки символов, которые равны значению "трактор", текущему значению TestltemS, или находятся между "ЭЭЭЭ" и "ЯЯЯЯ" в алфавитном порядке.

Строки оцениваются в соответствии с ASCII-кодами их символов.
Строчные буквы имеют большие ASCII-коды, чем прописные, например:

"кот" > "Кот" > "КОТ"

Если выражение выбора удовлетворяет нескольким условиям CASE, выполняется блок операторов, идущий первым.

Блоки SELECT CASE могут быть вложенными.

Каждый блок должен иметь завершение END SELECT.

Задача-1.

Составить программу для решения квадратного уравнения.

Решение:

Посмотреть >>>