Question

Открытка на день рождения Имя входного файла: стандартный ввод Имя выходного файла: стандартный вывод Ограничение по времени: 1 секунда Ограничение по памяти: 256 мегабайт У Васи скоро день рождения, поэтому Петя хочет отправить ему открытку. Он уже купил пре- красную открытку и конверт, но тут перед ним возникла проблема: открытка очень большая и может не влезть в конверт. Открытка и конверт представляют из себя два прямоугольника со сторонами p1 и p2 для от- крытки и e1 и e2 для конверта соответственно. Открытку можно поместить в конверт только таким образом, чтобы стороны открытки были параллельны сторонам конверта. Вася просит помочь ему определить, поместится ли его открытка в купленный им конверт. Формат входных данных Первая строка содержит два целых числа e1 и e2 (1 ⩽ e1, e2 ⩽ 105 ) — длины сторон конверта. Вторая строка содержит два целых числа p1 и p2 (1 ⩽ p1, p2 ⩽ 105 ) — длины сторон открытки. Формат выходных данных Выведите «YES» (без кавычек), если Васе удастся разместить открытку в конверте и «NO» в противном случае. Примеры стандартный ввод стандартный вывод 7 8 4 5 YES 1 3 2 4 NO 3 5 4 решите пж задачу на паскале

Answer 1

Объяснение:

var p1, p2, e1, e2 : integer;

Begin

readln(p1, p2);

readln(e1, e2);

if ((p1 / e1 >=1)and(p2 / e2 >=1)) or ((p2/e1 >=1) and (p1 / e2 >=1))

then writeln('YES')

else writeln('NO');

end.

Answer 2

Конечно, вот решение задачи на языке Pascal:

pascalCopy code
program BirthdayCard;

var
  e1, e2, p1, p2: integer;

begin
  // Ввод данных
  readln(e1, e2);
  readln(p1, p2);
  
  // Проверка, поместится ли открытка в конверт
  if ((e1 <= p1) and (e2 <= p2)) or ((e1 <= p2) and (e2 <= p1)) then
    writeln('YES')
  else
    writeln('NO');
end.

Вы можете скопировать этот код и вставить его в онлайн компилятор для Pascal, чтобы выполнить тесты с различными входными данными и убедиться, что он работает правильно. Например, введите "7 8" на первой строке и "4 5" на второй строке, и программа должна вывести "YES".