var i:integer;
label gotolabel;
begin
for i:=0 to 20 do
begin
showmessage(‘i = ‘+inttostr(i));
if i=8 Then goto gotolabel
end;
Gotolabel:
showmessage(‘Sonuca gelindi’);
end;
label gotolabel;
begin
for i:=0 to 20 do
begin
showmessage(‘i = ‘+inttostr(i));
if i=8 Then goto gotolabel
end;
Gotolabel:
showmessage(‘Sonuca gelindi’);
end;
