Язык:
Русский
English
{Halt.PAS}
{ Пример программы для процедуры Halt }
uses Crt;
begin
if 1 = 1 then
begin
if 2 = 2 then
begin
if 3 = 3 then
begin
Halt(1); { Останавливаемся прямо здесь! }
end;
end;
end;
WriteLn('Это не будет напечатано... ;-)');
end.
begin
if 1 = 1 then
begin
if 2 = 2 then
begin
if 3 = 3 then
begin
Halt(1); { Останавливаемся прямо здесь! }
end;
end;
end;
WriteLn('Это не будет напечатано... ;-)');
end.