Componentes.Terceros.RemObj.../official/5.0.23.613/Pascal Script for Delphi/Samples/Import/exittest.rops

14 lines
145 B
Plaintext

Program IFSTest;
procedure test;
begin
writeln('1');
exit;
writeln('2');
end;
Begin
test;
writeln('3');
exit;
writeln('4');
End.