Блог учителя Информатики

Решение задачи ExamBegin1


Условие задачи:

На вход подаются два целых числа; числа расположены в одной строке. Вывести вначале максимальное, а затем минимальное из них. Числа должны выводиться в одной строке и разделяться одним пробелом.


uses PT4Exam;

var
  a, b: integer;

begin
  Task('ExamBegin1');
  Read(a, b);
  if a > b then Write(a, ' ', b)
  else Write(b, ' ', a);
end.
Поделиться:
Вам также может понравится
Делаем Черепашку в виде снежинки
Перевод десятичных чисел в двоичные на Pascal
Решение задачи ExamBegin80
Решение задачи ExamBegin79

Оставьте комментарий