Информатика. Программирование в Delphi
353
begin
и
end
можно не писать.
Инструкция while
while Условие do
begin
{инструкции}
end ;
Сначала проверяется
Условие
. Если оно истинно, то выполняются инст-
рукции между
begin
и
end
. Затем снова проверяется
Условие
. Если оно выпол-
няется, то инструкции цикла выполняются еще раз. И так до тех пор, пока
Ус-
ловие
не станет ложным.
Если между
begin
и
end
находится только одна инструкция, то слова
begin
и
end
можно не писать.
Безусловный переход
Инструкция GoTo
GoTo Метка;
Инструкция осуществляет переход к инструкции, перед которой стоит
метка. Метка должна быть объявлена в разделе
label
.
Объявление функции
function Имя Функции (var Параметр1: Тип1; var Параметр2: Тип2;…
var ПараметрJ: ТипJ): Тип Функции;
const
{описание констант}
var
{описание переменных}
begin
{ инструкции}
Result : = Значение;
end;
Объявление процедуры
procedure Имя Процедуры (var Параметр1: Тип1; var Параметр2:
Тип2;.. var ПараметрJ: Tип J) ;
const
{описание констант}
var
{описание переменных}
begin
I...,343,344,345,346,347,348,349,350,351,352 354,355,356,357,358,359,360,361,362,363,...370