一道pascal最简单的编程

来源：百度知道 编辑：UC知道 时间：2024/06/23 08:11:35
输入两个数 要求只设置两个变量 将这两个数的值对换 要求只能使用加减乘除等基本运算

我帮你：
主体:
a:=a+b;
b:=a-b;
a:=a-b;
呵呵 应该对吧

var a,b:longint;
begin
read(a,b);
a:=a+b;
b:=a-b;
a:=a-b;
write(a,b);
end.

var a,b:integer;{设两个变量}
begin
a:=a+b;
b:=a-b;
a:=a-b;{进行调换}
write(a,b);{输出}
end;

var
a,b:longint;
begin
readln(a,b);
a:=a xor b;
b:=a xor b;
a:=a xor b;
writeln(a,b);
end.