EXIT - Izlazak iz procedure ili programa i vraĉa izvo|enje programa na pozivni program
Sintaksa: PROCEDURE Exit;

Tabela d.12. EXIT - procedura

Listing programa

Opis

PROGRAM ExitTekst;

Zaglavlje

PROCEDURE ExitRanije;

Potprogram

BEGIN

 

  WRITELN('O izlazasku iz procedure');

Ispis na ekran

  EXIT;

Izlazak iz procedure

  WRITELN('Nikad se nece izvesti');

Nikad se neĉe izvesti

END;

Kraj procedure

BEGIN

Glavni program

  WRITELN('O izlazasku iz programa');

Ispis na ekran

  EXIT;

Izlazak iz programa

  WRITELN('Nikad se nece izvesti');

Nikad se neĉe izvesti

READLN; END.

 

Listing programa:


PROGRAM pEXIT;
PROCEDURE ExitRanije;
BEGIN
  WRITELN('O izlazasku iz procedure');
  EXIT;
  WRITELN('Nikad se nece izvesti');
END;
BEGIN
  WRITELN('O izlazasku iz programa');
  EXIT;
  WRITELN('Nikad se nece izvesti');
  READLN;
END.

Index