Введение в программирование. Pascal и Delphi. Гурьянов Л.В - 29 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

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

Рубрика: 

28
Таблица 2.1 – Управляющие структуры
Управляющая структура
Оператор
языка Pascal
Пример
Последовательность
A; B;
Сначала выполняется A,
затем
B.
A, B – операторы обра-
ботки информации
readln(x);
y:= x;
Если_То_Иначе
if P then
A
else
B;
Если значение логическо-
го выражения
P истинно,
то выполняется
A,
иначе –
B
if x>0 then
y:= 1
else
y:=0;
Если_То
if P then
A;
if x>0 then
y:= 1;
Выбор
case K of
1: A;
2: B;
3: C
else
D;
end;
K
– переключатель, пе-
ременная, значение ко-
торой определяет вы-
полнение операторов:
если
K = 1, то A;
если K = 2, то B;
если K = 3, то C,
иначе – D
var
ch: char;
begin
. . .
case ch of
'0'..'9':
writeln
('Это
цифра');
'a'..'z':
writeln
('Это
буква')
else
writeln ('Это
другой
символ');
end;
. . .
end. 
Таблица 2.1 – Управляющие структуры
                                               Оператор
     Управляющая структура                                       Пример
                                              языка Pascal
                                      A; B;
 Последовательность                   Сначала выполняется A,
                                                               readln(x);
                                      затем B.
                                                               y:= x;
                                      A, B – операторы обра-
                                      ботки информации
                                      if P then
 Если_То_Иначе
                                        A
                                      else                     if x>0 then
                                        B;                       y:= 1
                                      Если значение логическо- else
                                      го выражения P истинно,   y:=0;
                                      то выполняется A,
                                      иначе – B

 Если_То

                                      if P then                if x>0 then
                                        A;                       y:= 1;




 Выбор                                case K of                var
                                      1: A;                      ch: char;
                                                               begin
                                      2: B;                     ...
                                      3: C                      case ch of
                                        else                   '0'..'9':
                                                               writeln
                                        D;                     ('Это
                                      end;                     цифра');
                                      K – переключатель, пе-   'a'..'z':
                                                               writeln
                                      ременная, значение ко-   ('Это
                                      торой определяет вы-     буква')
                                      полнение операторов:        else
                                      если K = 1, то A;        writeln ('Это
                                                               другой
                                      если K = 2, то B;        символ');
                                      если K = 3, то C,         end;
                                                               ...
                                      иначе – D                end.




                                 28

Страницы