{$codepage UTF8} VAR a,b, aux :integer; BEGIN a:=34; b:=19; aux:=b; b:=a; a:=aux END.