§37. Программирование ветвлений на Паскале Глава 6. Программное управление работой компьютера.
ВЫЧИСЛЕНИЕ ЛОГИЧЕСКИХ ВЫРАЖЕНИЙ или и и и и не 10 КОНЪЮНКЦИЯДИЗЪЮНКЦИЯИНВЕРСИЯF = 1 или 0 и 1 и или ? и F = не a и b или (c или d)F = не (a или b) и c или d не и или или 1 1 abcd 0110 не или и или не и или 1 1 abcd или не и или
Операции отношения = <> <= >= < > больше меньше больше или равно меньше или равно не равно равно Простое условие Сложное условие Логические операции NOTORAND Операторы в структуре ветвления могут быть простыми или составными ENDBEGIN Последовательность простых и (или) составных операторов xyx AND yx OR y NOT x false true falsetruefalsetrue false truefalse true false Сначала проверяется условие ЕСЛИ условие истинно, ТО выполняется оператор 1 ИНАЧЕ (если оно ложно) выполняется оператор 2 IF THEN ELSE условие да нет оператор 1 оператор 2 Полное ветвление да нет Неполное ветвление IF THEN условие оператор
Задача: найти наибольшее значение среди трех величин: A, B, C алг БИТ2 если A > B ввод A, B, C нач вещ A, B, C, D кон вывод D иначе если B > C то D := B иначе D := C кв кв то если A > C то D := A иначе D := C кв IF PROGRAM VAR READLN WRITELN IF THEN ELSE : REAL a, b, c, d () ; BIT2 ; a, b, c ; END. a > b () BEGIN :=:= da ;:=:= d b d IF a > c b > c THEN ELSE :=:= dc :=:= d c начало да нет A > B ввод A, B, C конец вывод D D : = A да нет A > C D : = CD : = B да нет B > C D : = C
C : = X начало да нет X > Y Задача: составить алгоритм упорядочивания значений двух переменных ввод X, Y алг СОРТИРОВКА если X > Y ввод X, Y нач вещ X, Y, C кон вывод X, Y то C := X кв X : = Y Y : = C X := Y Y := C конец вывод X, Y PROGRAM VAR READLN WRITELN IF THEN : REALx, y, c () ; SORTING ; x, y ; END x > y BEGIN END. ; :=:= cx :=:= xy :=:= yc ; ; ()x, y