Логин: Пароль:    Регистрация Всеми возможностями сайта можно пользоваться
только после авторизации.
   Забыли пароль?

Поиск
L



Статистика
u
Пользователи онлайн: нет
Гостей онлайн: 6
Всего онлайн: 6
Зарегистрировано юзеров: 7938
Комментариев на сайте: 698
Новый юзер: Henryfar



Последние комментарии
c
Dennisvoifs прокомментировал "Урок 3 - Конструкция IF...THEN...ELSE":
Пункт коммерческого учета цена, Ктп комплектные трансформаторные подстанции москва, Производство ктп москва и не только Вы найдете на нашем специализированном сайте: - Вам к нам!https://sviloguzov.ru/
Arthurneime прокомментировал "Урок 53 - Потоки в Delphi, (часть 1/3)":
[img]https://masterfutures.ru/wp-content/uploads/2020/03/14-2.png[/img] Online trading is becoming increasingly popular, as more people learn of the earning potential of platforms such as Broker, a broker which caters to a significant audience of digital traders (12 million and counting). Known for their excellent user interface, as well as fast deposit and withdrawal times, Broker provides multiple features to help traders earn on the markets. This overview will outline just some of the key aspects traders can expect to enjoy whilst working with Broker broker. Online trading is becoming increasingly popular, as more people learn of the earning potential of platforms such as Broker, a broker which caters to a significant audience of digital traders (12 million and counting). Known for their excellent user interface, as well as fast deposit and withdrawal times, Broker provides multiple features to help traders earn on the markets. This overview will outline just some of the key aspects traders can expect to enjoy whilst working with Broker broker. Broker Broker is operated by a dedicated team, whose main priority has always been to provide the best possible user experience, and ultimately satisfaction. Whether experienced in trading or a newcomer, the platform is easy to use and very responsive. The education section deserves special mention, particularly for assisting traders to learn and implement new strategies – which can be tested on the platforms free demo Source: [url=https://bit.ly/35fv3B6/]Broker[/url] https://bit.ly/35fv3B6/ Tags: Broker

Урок 87 - Оператор GOTO

Инструкции if и case используются для перехода к последовательности инструкций программы в зависимости от некоторого условия. Поэтому ихиногда называют инструкциями условного перехода. Помимо этих инструкций управления ходом выполнения программы существует еще одна — инструкция безусловного перехода goto. В общем виде инструкция goto записывается следующим образом:

goto Метка;
где метка — это идентификатор, находящийся перед инструкцией, которая должна быть выполнена после инструкции goto. Метка, используемая в инструкции goto, должна быть объявлена в разделе меток, который начинается словом label и располагается перед разделом объявления переменных. В программе метка ставится перед инструкцией, к которой должен быть выполнен переход в результате выполнения инструкции goto. Сразу после метки ставится двоеточие.

В листинге приведен вариант процедуры проверки числа, в которой ин струкция goto используется для завершения процедуры в том случае, если пользователь введет неверные данные.

Листинг:
procedure TForml.ButtonlClickfSender: TObject);
label // раздел объявления меток
bye;
var
n: integer; // проверяемое число
d: integer; // делитель
r: integer; // остаток от деления п на d
begin
n:=StrTo!nt(Edit1.text);
if n <= 0 then
begin
MessageDlg('Число должно быть больше нуля.',
mtError,(mbOkl,Q);
Editl.text:= '';
goto bye;
end;
// введено положительное число
d: = 2; // сначала будем делить на два
repeat
r:= n mod d;
if r о 0 // n не разделилось нацело на d
then d:= d + 1;
until r = 0;
Iabel2.caption:=Editl.text;
if d = n
then Iabel2.caption:=label2.caption+ ' — простое число.' 
else Iabel2.caption:=labe!2.caption+ ' — обычное число.';
bye:
end;
 
В литературе по программированию можно встретить суждения о недопустимости применения инструкции goto, поскольку она приводит к запутан ности программ. Однако с категоричностью таких утверждений согласиться нельзя. В некоторых случаях применение инструкции goto вполне оправдано. Приведенный пример, где инструкция goto используется для аварийного завершения процедуры, относится именно к таким случаям.

Удачи!
Встретимся в следующем уроке!


Источник: www.thedelphi.ru
Автор: Савельев Александр
Опубликовано: 6 Октября 2013
Просмотров: 8818

Урок 86 - Оператор CASE Урок 88 - Рекурсия

Зарегистрируйтесь или авторизуйтесь, чтобы добавлять комментарии.