Var A,B,C:Integer;
begin
read(A);
read(B);
C:=A;
A:=B;
B:=C;
writeln(A=+inttostr(A));
writeln(B=+inttostr(B));
readln;
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.