Презентация на тему Язык программирования QBasic. Разветвляющийся алгоритм

команды алгоритма выполняется по порядку, друг за другом.

CLS
DATA 2,4,6
READ

A,B,C
INPUT "Чему равно значение Х"; Х
Y=(A*Х*Х+B)/(4-3*С)
PRINT "Значение Y при Х="Х" равно" Y
END

ветвления: однострочный и блочный.
  Однострочный:
Оператор

1 Оператор 2
IF <условие> THEN или ELSE или
GOTO метка GOTO метка

IF

THEN

ELSE

ЕСЛИ

ТОГДА

ИНАЧЕ

; ; ; < ;

>) две величины, причём эти величины могут быть подсчитаны до оператора IF или непосредственно в условии.
Нельзя в условии записывать двойное неравенство. В условии допускается сравнение нескольких величин, но при использовании знаков логики OR, AND.

.

CLS
1: INPUT ”Введите любое число”; X
IF

X>=0 THEN ? ”Корень квадратный из Х=“ ; SQR(X) ELSE ?”Корень квадратный из отрицательного числа вычислить невозможно”
END

ДА

НЕТ

операторы, даже включая IF.
IF THEN IF THEN

…
Часто используется УКОРОЧЕННОЕ ВЕТВЛЕНИЕ, то есть отсутствует ELSE.
IF <условие> THEN …
Для такого использования надо помнить: если условие не выполняется, то машина переходит к выполнению следующей строки, стоящей после оператора IF.

Ветвление

нет.
CLS
INPUT "Какое число проверяем ";B
IF B/2 = INT(B/2) THEN

PRINT “Число чётное” ELSE PRINT “Число нечётное”
END

Ветвление

операторы 2
END IF

Ветвление
ДА
НЕТ

нет.
CLS
INPUT "Какое число проверяем ";B
IF B/2 = INT(B/2) THEN

PRINT "Число чётное"
ELSE
PRINT "Число нечётное"
END IF
 

Ветвление