Система программирования Турбо Паскаль. Воробьева А.П - 29 стр.

UptoLike

ВУЗ: 

НГАСУ «Сибстрин» | Новосибирск

Составители: 

Рубрика: 

59
Блок-схема Программа
Program P;
Var
a, b, c, y: real;
Begin
writeln(‘Введите’,
‘ числа a, b, c’);
read(a, b, c);
y := a;
if b<y then y := b;
if c<y then y := c;
writeln(‘y =’, y:6:2);
End.
Полный условный оператор
Общий вид записи
if <логическое выражение> then P1 else P2
;
где P1, P2 – любые операторы.
y := b
y := c
y := a
a
,
b
,
c
H
H
Д
b<y
Н
Д
c<y
y
K
60
Работа оператора
Вычисляется логическое выражение, и если оно имеет значе-
ние
TRUE, то выполняется оператор P1, стоящий после служеб-
ного слова
then. В противном случае выполняется оператор P2,
стоящий после служебного слова
else.
Графическая интерпретация оператора
В блок-схемах полному условному оператору соответствует
структура
ЕСЛИ–ТО–ИНАЧЕ.
Замечание. Операторы P1 и P2 входят в конструкцию пол-
ного условного оператора как единственные. Если возникает не-
обходимость выполнить в ветвях несколько операторов, то их за-
ключают в операторные скобки
begin…end. Вид записи условно-
го оператора в этом случае следующий.
if <логическое выражение> then
begin
<оператор
1>;
……………...
<оператор
n>;
end
else
begin
<оператор
1>;
……………...
<оператор
m>;
end;
Пример 1. Вычислить значение переменной у по одной из
двух ветвей:
⎪
⎩
⎪
⎨
⎧
≤
>
=
.0если,
,0если,ln
xe
xx
y
x
P
1
H
(
F)
Д
(
Т)
Условие
(ЛВ)
P
2
               Блок-схема               Программа                Работа оператора
                                     Program P;                      Вычисляется логическое выражение, и если оно имеет значе-
                    H                Var                         ние TRUE, то выполняется оператор P1, стоящий после служеб-
                                        a, b, c, y: real;        ного слова then. В противном случае выполняется оператор P2,
                                     Begin                       стоящий после служебного слова else.
                  a, b, c               writeln(‘Введите’,       Графическая интерпретация оператора
                                            ‘ числа a, b, c’);       В блок-схемах полному условному оператору соответствует
                                        read(a, b, c);
                                        y := a;                  структура ЕСЛИ–ТО–ИНАЧЕ.
                  y := a                if b then
                                                                                       begin
                                                                                          <оператор 1>;
                                                                                          ……………...
                     y                                                                    <оператор n>;
                                                                                       end
                                                                                   else
                                                                                       begin
                    K                                                                     <оператор 1>;
                                                                                          ……………...
                                                                                          <оператор m>;
                                                                                       end;
                  Полный условный оператор
                                                                      Пример 1. Вычислить значение переменной у по одной из
Общий вид записи
                                                                 двух ветвей:
         if <логическое выражение> then P1 else P2;
                                                                                               ⎧⎪ln x, если x > 0,
где P1, P2 – любые операторы.                                                               y=⎨ x
                                                                                                ⎪⎩e , если x ≤ 0.

                            59                                                                 60

Страницы