Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

Поменять местами два введенных числа. Паскаль.

Ответ оставил Гость

Var
  m,n,t:integer;
begin
  Write(Введите два натуральных числа: ); Read(m,n);
  t:=m; m:=n; n:=t;
  Writeln(Результат обмена: ,m,, ,n)
end.

Тестовое решение:
Введите два натуральных числа: 35 -20
Результат обмена: -20, 35