Поменять местами значения х и у не используя дополнительную переменную.(Pascal)

Поменять местами значения х и у не используя дополнительную переменную.(Pascal)
Гость
Ответ(ы) на вопрос:
Гость
Var x,y:integer;  Begin   x:=20;   y:=40;   x:=x+y;   y:=x-y;   x:=x-y;   Write (x,'  ',y); End.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы