mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-06 05:12:39 +02:00
9 lines
131 B
Plaintext
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. |