明解Ｃ言語 入門編 > 10. ポインタ > ２つの値を交換する Delphi program Project1;{$APPTYPE CONSOLE}uses SysUtils;procedure swap1(nx:Integer; ny:Integer); var tmp: Integer; begin tmp := nx; nx := ny; ny := tmp; end;procedure swap2(var nx:Integ…