Delphi中的比较运算符包括: =,>,<,>=,<=,<> 条件语句是:if 如何如何 then 如何如何 else 如何如何;其他的你自己应该能完成吧?
算了,不逗你了:-),给你个例子吧:function min(a, b: Integer): Integer; begin if a < b then Result := a else Result := b; end;function min3(a, b, c: Integer): Integer; begin Result := min(min(a, b), c); end;
条件语句是:if 如何如何 then 如何如何 else 如何如何;其他的你自己应该能完成吧?
begin
if a < b then
Result := a
else
Result := b;
end;function min3(a, b, c: Integer): Integer;
begin
Result := min(min(a, b), c);
end;