Pascal. Задача 1-7

Пользователь вводит два целых числа в переменные A и B. Поменять значения у переменных местами и вывести их.

Решение

var
  A, B, C : integer;
begin
  write('Введите значение переменной A? ');
  read(A);
  write('Введите значение переменной B? ');
  read(B);
  C := A;
  A := B;
  B := C;
  writeln('A =  ', A);
  writeln('B =  ', B);
end.

◄▲►