Поменять значение двух переменных без использования третьей

@cyber18 · Регистрация: 02.11.2012

Author24 — интернет-сервис помощи студентам

Задача.Даны 2 переменные.поменять их местами путем сложения и вычитания без использования 3-й переменной.
Пишу такой кодик:

Pascal

var
a,b:integer;
a:=20;
b:=13;
a:=a+b-a;writeln('20+13-20',a);
b:=b+a-b;writeln('13+20-13',b);
readln;
end.

выдает
20+13-20=13
13+20-13=13
почему так?

@ermolay · 22.11.2012, 22:43

после пятой строчки a принимает значение 13, следовательно в шестой получается выражение
13+13-13

@Amator · 22.11.2012, 22:55

сделайте тремя действиями

Pascal

1
2
3

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

@Ce7eH_111 · 22.11.2012, 22:56

a:=a+b; 5+3=8
b:=a-b; 8-3=5
a:=a-b; 8-5=3

@lamia1dl6 · 22.10.2021, 22:41

Pascal

program p2;
 
var a,b:real;
begin
Writeln('a=');
read(a);
Writeln('b=');
read(b);
a:= a+b;
b := a-b;
a := a-b;
Writeln('a=',a);
Writeln('b=',b);
End.

Просто подставь значения

@bormant · 23.10.2021, 12:42

lamia1dl6,
автор темы последний раз заходил на этот форум в 2013, а у меня на календаре сейчас 2021.
По прежнему думаете, что сюда стоило написать обязательно, а не пройти мимо?

PS. Это ничем не отличается от #3.

@ermolay 3451 / 2389 / 2135 Регистрация: 04.12.2011 Сообщений: 3,966
	22.11.2012, 22:43	2
	после пятой строчки a принимает значение 13, следовательно в шестой получается выражение 13+13-13 0

@Ce7eH_111 34 / 34 / 19 Регистрация: 17.11.2012 Сообщений: 109 Записей в блоге: 2
	22.11.2012, 22:56	4
	a:=a+b; 5+3=8 b:=a-b; 8-3=5 a:=a-b; 8-5=3 0

@bormant Модератор 7769 / 4598 / 2823 Регистрация: 22.11.2013 Сообщений: 13,076 Записей в блоге: 1
	23.10.2021, 12:42	6
	lamia1dl6, автор темы последний раз заходил на этот форум в 2013, а у меня на календаре сейчас 2021. По прежнему думаете, что сюда стоило написать обязательно, а не пройти мимо? PS. Это ничем не отличается от #3. 0

Опции темы

Поменять значение двух переменных без использования третьей

Решение