Question

Ввести два числа и вывести их в порядке возрастания.
Пример:
Введите два числа:
15 9
Ответ: 9 15

Answer 1

program z1;
var  a, b: integer;
begin
  writeln('Введите A:'); 
 readln(a);
  writeln('Введите B:');
  readln(b); 
 if a < b then
   begin 
  write(' ', a); 
   write(' ', b); 
 end; 
 if b < a then 
 begin   
 write(' ', b); 
   write(' ', a); 
 end;
end.