Why Gemfury?
Push, build, and install
RubyGems
npm packages
Python packages
Maven artifacts
PHP packages
Go Modules
Debian packages
RPM packages
NuGet packages
Repository URL to install this package:
|
Version:
1.6 ▾
|
lazarus
/
usr
/
share
/
lazarus
/
1.6
/
components
/
PascalScript
/
Samples
/
Import
/
booleantest.rops
|
|---|
Program IFSTest;
var
x1, x2: integer;
b: boolean;
Begin
x1 := 2;
x2 := 2;
b := x1 = x2;
if b then begin writeln('true'); end else begin writeln('false');end;
x1 := 2;
x2 := 4;
b := x1 = x2;
if b then begin writeln('true'); end else begin writeln('false');end;
writeln('done');
End.