mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-18 11:11:35 +02:00
8 lines
83 B
ObjectPascal
8 lines
83 B
ObjectPascal
var
|
|
k,l : word;
|
|
begin
|
|
if (k<>l)=false then
|
|
;
|
|
if (k<>l)=true then
|
|
;
|
|
end. |