ПЗ1 / z1

//1) Поменяйте местами значения вещественных переменных N и M, переменные вводит пользователь
var
n, m, z: integer; //объявление переменных. Вводим ещё одну переменную для сохранения промежуточного результата

begin
readln(n); //ручной ввод пользователя
readln(m);

writeln('n = ', n, ', m = ', m); //вывод результата до перестановки

z := n; //перестановка с промежуточными значениями
n := m;
m := z;

writeln('n = ', n, ', m = ', m); //вывод результата после перестановки
end.