Componentes.Terceros.RemObj.../internal/6.0.43.801/1/RemObjects Samples/Pascal Script for Delphi/Import/if.rops
2010-01-29 16:17:43 +00:00

9 lines
131 B
Plaintext

Program IFSTest;
var
a: boolean;
Begin
a := true;
if a then begin ;end else
if a then begin ;end else;
writeln('5');
End.