为了账号安全,请及时绑定邮箱和手机立即绑定

关于 pascal中标准函数swap(x,y)pascal的解释?

/ 猿问

关于 pascal中标准函数swap(x,y)pascal的解释?

慕用2447696 2019-02-06 16:07:29


求两数的最小公倍数

function lcm(a,b:integer):integer;
begin
if a<b then swap(a,b);
lcm:=a;
while lcm mod b>0 do inc(lcm,a);
end;

查看完整描述

2 回答

?
侃侃尔雅

Exchanges high order byte with the low order byte of an integer or word.

Unit

System

Category

backward compatibility routines

Delphi syntax:

function Swap(X);

Description

In Delphi code, Swap exchanges the high-order bytes with the low-order bytes of the argument. X is an expression of type SmallInt, as a 16-bit value, or Word. This is provided for backward compatibility only.

查看完整回答
反对 回复 2019-03-22
?
慕田峪7331174

交换a,b两变量的值
swap(a,b)实际上就是
t:=a;//t为临时变量
a:=b;
b:=t;

查看完整回答
反对 回复 2019-03-22

添加回答

回复

举报

0/150
提交
取消
意见反馈 帮助中心 APP下载
官方微信