10 lines
103 B
ObjectPascal
10 lines
103 B
ObjectPascal
var i : integer;
|
|
f : boolean;
|
|
begin
|
|
i := 5;
|
|
if i < 10 then
|
|
f := true
|
|
else
|
|
f := false;
|
|
end.
|