Вводятся величины X,Y целого типа. Разработать схему алгоритма для обмена значений...

Question

Вводятся величины X,Y целого типа. Разработать схему алгоритма для обмена значений величин. Необходимо использовать вспомогательную величину Т. Протестировать алгоритм для X=5 и Y=-11.

Answer 1

Program Pr1;

uses crt;

var x,y,t:integer;

Begin

clrscr;

readln(x,y);

t:=x;

x:=y;

y:=t;

writeln(x,y);

end.

Answer 2

var
x,y,t:integer;
begin
write('x=');
readln(x);
write('y=');
readln(y);
t:=x;
x:=y;
y:=t;
writeln('x=',x,' y=',y);
readln;
end.