Различия

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

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

Предыдущая версия справа и слева Предыдущая версия
remobject_pascal_script:ehlementy_jazyka [2018/04/01 18:49]
jurist23rus [Переменные]
remobject_pascal_script:ehlementy_jazyka [2018/04/23 08:21] (текущий)
7bit Форматирование кода
Строка 26: Строка 26:
 <code delphi> <code delphi>
 const const
-Kbyte = 1024; +  Kbyte = 1024; 
-Mbyte = Kbyte * Kbyte; +  Mbyte = Kbyte * Kbyte; 
-Gbyte = 1024 * Mbyte;+  Gbyte = 1024 * Mbyte;
 </code> </code>
  
Строка 38: Строка 38:
 <code delphi> <code delphi>
 var var
-inValue: Integer; +  inValue: Integer; 
-byValue: Byte;+  byValue: Byte;
 </code> </code>
  
Строка 47: Строка 47:
 Константы объявляются в разделе const: Константы объявляются в разделе const:
 const const
-MAX_LEN = 150; +  MAX_LEN = 150; 
-Msg = ‘Привет, МИР!!!’;+  Msg = ‘Привет, МИР!!!’;
 В модуле может быть неограниченное количество разделов const. Область видимости констант – от начала объявления до конца модуля. В модуле может быть неограниченное количество разделов const. Область видимости констант – от начала объявления до конца модуля.
 Примечание. Pascal Script не поддерживает в объявлении констант конструкторы множеств, массивов, неопределенный указатель nil, вызовы функций. Примечание. Pascal Script не поддерживает в объявлении констант конструкторы множеств, массивов, неопределенный указатель nil, вызовы функций.
Строка 57: Строка 57:
 <code delphi> <code delphi>
 var var
-MyVar: Integer; // Пример глобальной переменной. Переменная видима в пределах модуля.+  MyVar: Integer; // Пример глобальной переменной. Переменная видима в пределах модуля.
  
 procedure MyProc; procedure MyProc;
 var var
-s: string; // Пример локальных переменных.  +  s: string; // Пример локальных переменных.  
-i, j: integer; // Переменные видимы в пределах процедуры.+  i, j: integer; // Переменные видимы в пределах процедуры.
 begin begin
-+  
 end; end;
 </code> </code>
Строка 76: Строка 76:
 Label Loop; Label Loop;
 begin begin
- goto Loop; +  goto Loop; 
- // Программист требует передать управление +  // Программист требует передать управление 
- // оператору, помеченному меткой Loop. +  // оператору, помеченному меткой Loop. 
-… +  … 
- // Эти операторы будут пропущены +  // Эти операторы будут пропущены 
- Loор: +Loор: 
- // Оператору, идущему за этой меткой, +  // Оператору, идущему за этой меткой, 
- // будет передано управление +  // будет передано управление 
- …+  
 end; end;
 </code> </code>