Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

ПЗ1 / z1

.pas
Скачиваний:
0
Добавлен:
30.09.2024
Размер:
808 б
Скачать
//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.
Соседние файлы в папке ПЗ1