Условный оператор Автор: Облицова Татьяна Александровна, учитель информатики МБОУ СОШ 6, г.Боготол, Красноярский край

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

Полная форма условного оператора IF THEN ELSE ; Перед словом Else, знак ; отсутствует. Если (IF) условие истинно, тогда (THEN) выполняется оператор1, иначе (ELSE) выполняется оператор2. Для наглядности программы операторы можно писать в несколько строк После слов Then и Else можно использовать только один оператор.

Операции отношения: >- больше =- больше или равно 5 B=0 S

IF THEN BEGIN ; … ; END ELSE BEGIN ; … ; END; Если по условию задачи после THEN или ELSE необходимо выполнить больше одного оператора, то тогда используют операторные скобки BEGIN…END

PROGRAM zadacha1; VAR A,B:INTEGER; BEGIN WRITE(A=); READLN(A); WRITE(B=); READLN(B); WRITE (Большее число : ); IF A>B THEN WRITELN (A) ELSE WRITELN (B); END. Задача1. Из двух чисел А и В найти большее и вывести его на экран. Описываем переменные А и В целыми числами Вводим числа А и В Если А>В, то выводим на экран А, иначе выводим В

Неполная форма условного оператора IF THEN ; Пример: Удвоить число Х, если оно положительное: IF X>0 THEN X:=X*2;

Задача2. Составить программу для решения квадратного уравнения ax 2 +bx + c = 0 Блок-схема алгоритма Вложенное условие

PROGRAM zadacha2; VAR a,b,c,D,x,x1,x2:REAL; BEGIN WRITE(a=); READLN(a); WRITE(b=); READLN(b); WRITE(c=); READLN(c); D:= b*b - 4*a*c; WRITE (Корни уравнения: ); IF D>0 THEN BEGIN x1:=(-b+SQRT(D))/(2*a); x1:=(-b-SQRT(D))/(2*a); WRITELN (x1=,x1:5:2,x2=,x2:5:2); END ELSE IF D=0 THEN BEGIN x:= -b/(2*a); WRITELN (x=,x:5:2); END ELSE WRITELN (Корней нет); END. Программа для решения квадратного уравнения Внешнее условие Вложенное условие

Сложные условия В сложных условиях используются логические выражения, записанные с помощью логических операций. Логические операции: Not- Не And- И Or- Или Мультипликативные операции: Div- целая часть от деления Mod- остаток от деления Примеры: Определить, есть ли среди чисел a, b, c хотя бы одно равное нулю. IF (a>0) Or (b=0) THEN WRITELN(YES) ELSE WRITELN(NO); Определить, является ли число а – нечетным. IF a Mod 20 THEN WRITELN(YES) ELSE WRITELN(NO); Каждое простое условие заключается в скобки

Задача3. Написать программу, проверяющую, принадлежит ли число интервалу (0;5]. PROGRAM zadacha3; VAR x:REAL; BEGIN WRITE(x=); READLN(x); IF (x>0) and (x

Коротко о главном Формы записи условного оператора: IF THEN ELSE ; IF THEN ; Перед ELSE знак ; не ставится Операции отношения: > >=

На слайде 1 использована картинка из следующего источника: Энциклопедия для детей. Т.22. Информатика/Глав. ред. Е.Хлебалина; вед. науч.ред. А.Леонов.- М.: Аванта+, 2005.