Различия

Показаны различия между двумя версиями страницы.

Ссылка на это сравнение

Предыдущая версия справа и слева Предыдущая версия
remobject_pascal_script:operatory [2018/04/01 20:19]
jurist23rus [Оператор FOR]
remobject_pascal_script:operatory [2018/04/23 08:37] (текущий)
7bit Форматирование кода
Строка 34: Строка 34:
 procedure MyProc; procedure MyProc;
 label label
- Lbl1, Lbl2, met1; +  Lbl1, Lbl2, met1; 
- …+  
 begin begin
- … +  … 
- Lbl1: +Lbl1: 
- … +  … 
- goto met1; +  goto met1; 
- Lbl2: +Lbl2: 
- … +  … 
- goto Lbl1; +  goto Lbl1; 
- Met1: +Met1: 
- …+  
 end; end;
 </code> </code>
Строка 62: Строка 62:
 <code delphi> <code delphi>
 begin begin
- [оператор1]; +  [оператор1]; 
- [оператор2]; +  [оператор2]; 
- … +  … 
- [операторN];+  [операторN];
 end; end;
 </code> </code>
Строка 88: Строка 88:
 <code delphi> <code delphi>
 var var
- X, Y, Max: Integer;+  X, Y, Max: Integer;
 begin begin
- if X > Max then +  if X > Max then 
-  Y := Max  +    Y := Max  
- else +  else 
-  Y := X; +    Y := X; 
- …+  
 end; end;
 </code> </code>
Строка 105: Строка 105:
 Условными называются выражения, имеющие одно из двух возможных значений: истина или ложь. Такие выражения чаще всего получаются при сравнении переменных с помощью операций отношения ''=, <>, >, >=, <, <=''. Сложные логические выражения составляются с использованием логических операций ''and'' (логическое И), ''or'' (логическое ИЛИ) и ''not'' (логическое НЕ). Например: Условными называются выражения, имеющие одно из двух возможных значений: истина или ложь. Такие выражения чаще всего получаются при сравнении переменных с помощью операций отношения ''=, <>, >, >=, <, <=''. Сложные логические выражения составляются с использованием логических операций ''and'' (логическое И), ''or'' (логическое ИЛИ) и ''not'' (логическое НЕ). Например:
  
-''if (а > b) and (b <> 0) then …''+<code delphi> 
 +if (а > b) and (b <> 0) then … 
 +</code>
  
 <WRAP center round tip 80%> <WRAP center round tip 80%>
Строка 113: Строка 115:
 Например, такая запись предыдущего оператора будет неверной: Например, такая запись предыдущего оператора будет неверной:
  
-''if a > b and b <> 0 then …''+<code delphi> 
 +if a > b and b <> 0 then … 
 +</code>
  
 С учетом приоритета операций компилятор будет транслировать такую строку как: С учетом приоритета операций компилятор будет транслировать такую строку как:
  
-''if a > (b and b) <> 0 then …''+<code delphi> 
 +if a > (b and b) <> 0 then … 
 +</code>
  
 Часть else [оператор2] условного оператора может быть опущена. Тогда при значении True условного выражения выполняется [оператор1], в противном случае этот оператор пропускается: Часть else [оператор2] условного оператора может быть опущена. Тогда при значении True условного выражения выполняется [оператор1], в противном случае этот оператор пропускается:
Строка 123: Строка 129:
 <code delphi> <code delphi>
 var var
-X, Y, Max: Integer;+  X, Y, Max: Integer;
 begin begin
- if X > Мах then Мах := X; +  if X > Мах then Мах := X; 
- Y := X;+  Y := X;
 end; end;
 </code> </code>
Строка 135: Строка 141:
 <code delphi> <code delphi>
 if [условие1] then if [условие1] then
- +  
 else if [условие2] then else if [условие2] then
- +  
 else if [условие3] then else if [условие3] then
- +  
 else else
- +  
 </code> </code>
  
Строка 150: Строка 156:
 <code delphi> <code delphi>
 case [выражение] of case [выражение] of
- [выражение_1]:[оператор_1]; +  [выражение_1]:[оператор_1]; 
- [выражение_2]:[оператор_2];  +  [выражение_2]:[оператор_2];  
- … +  … 
- [выражение_N]:[оператор_N]; +  [выражение_N]:[оператор_N]; 
- else [оператор];+  else [оператор];
 end; end;
 </code> </code>
Строка 225: Строка 231:
 while Self.EOF = False do while Self.EOF = False do
 begin begin
- … +  … 
- Self.MoveNext; +  Self.MoveNext; 
- end;+end;
 </code> </code>
  
Строка 236: Строка 242:
 <code delphi> <code delphi>
 repeat repeat
-[тело цикла];+  [тело цикла];
 until [условие]; until [условие];
 </code> </code>
Строка 255: Строка 261:
 while [условие] do while [условие] do
 begin begin
- … +  … 
- if [условие выхода из цикла] then Break; +  if [условие выхода из цикла] then Break; 
- …+  
 end; end;
 </code> </code>