Помогите пожалуйста!!!Нужно придумать метод обмена значениями без использования 3

Помогите пожалуйста!!!Необходимо придумать алгоритм размена значениями без использования 3 вспомогательной переменной

Задать свой вопрос
2 ответа
Var a,b: integer;
begin
  write('a = '); readln(a);
  write('b = '); readln(b);
  a:=a+b;
  b:=a-b;
  a:=a-b;
  writeln('a = ',a,'  b = ',b);
end.

a = 15
b = 20
a = 20  b = 15

Держи
var a,b,c:real; 
begin 
Writeln('A='); 
read(a); Writeln('B='); 
read(b); 
c:=b; 
b:=a; a:=c; 
Writeln('A=',a); 
Writeln('B=',b); 
End. 
 
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт