program OrderNumbers;
vanum1, num2, temp: integer;
begi// Вводим два числа с клавиатурwriteln('Введите первое число:')readln(num1)writeln('Введите второе число:')readln(num2);
// Если первое число больше второго, меняем их местамif num1 > num2 thebegitemp := num1num1 := num2num2 := tempend;
// Выводим числа в отсортированном порядкwriteln('Числа в отсортированном порядке: ', num1, ', ', num2)end.
program OrderNumbers;
va
num1, num2, temp: integer;
begi
// Вводим два числа с клавиатур
writeln('Введите первое число:')
readln(num1)
writeln('Введите второе число:')
readln(num2);
// Если первое число больше второго, меняем их местам
if num1 > num2 the
begi
temp := num1
num1 := num2
num2 := temp
end;
// Выводим числа в отсортированном порядк
writeln('Числа в отсортированном порядке: ', num1, ', ', num2)
end.