Операторы ветвления

Операторы ветвления Разветвленный процесс содержит несколько путей. Выбор того или иного пути зависит от выполнения некоторых условий. Во многих случаях возникает необходимость в изменении последовательного порядка операторов, становится возможным благодаря операторам управления. К ним в первую очередь относятся IF и CASE. Оператор IF реализует операцию условного перехода (операцию разветвления на два направления). Общий вид: If условное выражение then ... else ...; В условном выражении задается условие ветвления. При выполнении оператора IF это выражение вычисляется с получением логического результата. Если результат True, то выполняется простой или сложный оператор после слова Then. Если результат False, то выполняется оператор после Else. Например: If A <7.2 then Y = 5 * A else Y = 5 / A; Часть оператора Else ... можно не употреблять: If X> 0 then K = K + 1; Это означает, что в случае, когда число Х больше нуля, будет выполнено оператор K = K + 1. Если такое условие для конкретного числа ошибочна, то изменение К не происходит, а управление передается на оператор, который в программе записано после оператора If.
https://www.youtube.com/channel/UCjrEovcy--penyUKiBhNwKA

Составленный оператор Begin ...End существенно расширяет возможности If If A <0 then begin K = K + 1; R = a; End Else begin L = L + 1; Q = A; End; В сложном операторе записывают любое количество операторов. Они выполняются "как одно целое". Здесь могут быть "свои" If, циклы, и тому подобное. Обратите внимание на то, что после оператора, который стоит перед Else, не ставится точка с запятой. Оператор Case обеспечивает разветвление на несколько направлений. Общий вид: Case индекс выбора of список выбора; Else ...; End; где индекс выбора - простая переменная целого, символического, перечисляемых или логического типа; список выбора - совокупность простых или сложных операторов, перед каждым из которых стоит константа выбора, тип которой совпадает с типом индекса выбора. После слова Else может стоять простой или сложный оператор (эта конструкция может отсутствовать). Пример: Case Kit of 1: Y = sin (x); 2: Y = cos (x); 3: Y = sin (x) + cos (x); Else Y = 0; End; {Case} Переменная Kit (целого типа) должна быть определенной к выполнению оператора Case. Если Kit равна 1, исчисляется функция Y = sin (x), если она равна 2, то: Y = cos (x). В том случае, когда Kit отличается от 1, 2 или 3, будет выполнено оператор Y = 0. В списке выбора можно употреблять сложный оператор Вegin ... End . Пример: составить программу вычисления функции Программа Var X, Y, Z, F: Real; Begin Write ('Введите Y, Z:') ; ReadLn (Y, Z); Write ('Введите X:') ; ReadLn (X); IF (X> = Y) THEN F = SQR (X) + EXP (Z) / COS (Y) ELSE F = SIN (X) + COS (Z); WriteLn ('Значение F =', F); End.

Комментарии и пинги к записи запрещены.

Комментарии закрыты.