Инструменты пользователя

Инструменты сайта


remobject_pascal_script:operatory

Различия

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

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

Предыдущая версия справа и слева Предыдущая версия
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>​
remobject_pascal_script/operatory.txt · Последние изменения: 2018/04/23 08:37 — 7bit