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

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