Помогите пожалуйста^^

Question

Помогите пожалуйста^^

---

Comments

На каком языке?

---

Не важно

Answer 1

Var
a,b,c:integer;
begin
write('Введите значение A=');read(a);
write('Введите значение B=');read(b);
c:=a;
a:=b;
b:=c;
write('A=',a,' ','B=',b,' ','C=',c);
end.