Заданы величины x,y действительного типа.Написать программу для обмена значений величин.Использовать вспомогательные

Question

Евгения Хван Ученик (217), закрыт 15 лет назад

величины нельзя.Протестировать программу для x=-3,y=8.
Где найти решение?

Answer 1

var x,y:integer;
begin
x:=-3; y:=8;
X:=x+y; y:=x-y; x:=x-y;
writeln (x,' ',y);
end.

Answer 2

можно было проще... .
Одну вспомогательную взять, ей присвоить х, потом х присвоить у, а у присвоить вспомогательную.

Answer 3

Константин Брударь Мастер (1783) 15 лет назад

a:=a+b
b:=a-b
a:=a-b

Источник: "Программирование. Теоремы и задачи. " - А. Шень