Ветвление в алгоритмах
Ветвление Пример 1 Пример 2 1. Подойти к прилавку. 1. Посмотреть на термометр. 2. Если мороженое есть , то купить его. 2. Если t<-15 О, то одеть шубу, иначе одеть 3. Отойти от прилавка. куртку. 3. Выйти из дома.
Ветвление это такая форма организации действий, при которой если выполняется некоторое условие, то производится одна последовательность действий, а если не выполняется другая.
Блок ветвления нет условие да
1 - Мороженное есть? 3 1 + - t<-15 3 +
Ветвление в Pascal IF THEN ELSE если тогда иначе IF ELSE + THEN
- Q + P IF Q THEN P - Q + T IF Q THEN P ELSE T P
- Q + T 1 P 1 Т 2 P 2 Т 3 P 3 IF Q THEN BEGIN P 1; Р 2; Р 3; END; ELSE BEGIN T 1; Т 2; Т 3; END;
Составьте программу решения квадратного уравнения вида ax 2+bx+c=0. program rekvur; var a, b, c, d, x 1, x 2: real; begin write (‘a, b, c’); readln (a, b, c); d: =b*b-4*a*c; if d>=0 then begin x 1: =(-b + sqrt(d))/2/a; x 2: =(-b - sqrt(d))/2/a; write (‘x 1=’, x 1, ‘ x 2=’, x 2); end; else write (‘net korney’); end.
Выбор Q 1 P 1 Q 2 P 2 Q n Pn+1 Pn • CASE Q OF • 1: P 1; • 2: P 2; • … • n: Pn • ELSE Pn+1 • END;
По оценке, выраженной цифрой, дать ее словесное значение. program ocenka; var OC: integer; begin write (`oценка`); readln (ОС); case OC of 2: write (`неудовлетв`); 3: write (`удовлетв`); 4: write (`хорошо`); 5: write (`отлично`) end; end.