Во многих жизненных ситуациях принятие того или иного решения зависит от выполнения одного или нескольких условий. Виктор Михайлович Васнецов. Витязь на распутье (1878).

Разработаем программу «Тест» Если выбор правильный, то начисляем балл, иначе звуковой сигнал. Где обитают белые медведи? 1. В Антарктиде 2. В Арктике 3. В Африке 4. В зоопарке Ваш выбор:

Нужна переменная, в которой будет зафиксирован выбор ответа.(N) Нужна переменная, значением которой будет количество набранных баллов. (B) Пусть эти переменные имеют тип Byte.

Результаты теста: Если B=0, то ……. Если В=1, то ……. и т. д.

Полная форма условного оператора. IF THEN ELSE Действие 1Действие 2 Условие ДаНет

Неполная форма условного оператора. IF THEN Действие 1 Условие ДаНет

Условие записывается при помощи знаков, =, =, и логических операций AND, OR, NOT. Операции отношения в сложных условиях заключаются в скобки. Пример: IF (x>0) AND (y

Если в качестве блока Действие1 (Действие2) должна выполниться серия операторов, то эти операторы заключаются в операторные скобки Begin – End. Например: В случае неверного ответа должен раздаваться звуковой сигнал. Begin Sound (500); Delay(50000); NoSound End

Пример1: Даны два числа. Определить большее из чисел и вывести его на экран. Program Ex_5; Var A, B: Integer; Begin Write (Введите два числа A и B через пробел ); ReadLn (A, B); Write (Большее из двух чисел ); IF A>B THEN WriteLn (A) ELSE WriteLn (B); ReadLn; End.

Пример2: Проверить, принадлежит ли число, введенное с клавиатуры, интервалу (0, 5). Program Ex_6; Var X: Integer; Begin Write (Введите число X: ); ReadLn (X); IF (X >0) AND (X < 5) THEN WriteLn (X, принадлежит (0, 5)) ELSE WriteLn (X, не принадлежит (0, 5)); ReadLn; End.

Задача 1 Составьте программу вычисления функции: Задача 2 Определить, делится ли число на 7 без остатка? (Использовать операцию Mod) Задача 3 Определить, могут ли три числа, введенные с клавиатуры, быть сторонами треугольника. Является ли этот треугольник прямоугольным?