Определите, возможно ли детям сесть так, чтобы рядом с одной девочкой сидел как минимум один мальчик

@некит434 · Регистрация: 23.01.2014

Author24 — интернет-сервис помощи студентам

X девочек и Y мальчиков пошли в кинотеатр и купили билеты на один ряд. Определите, возможно ли детям сесть так, чтобы рядом с одной девочкой сидел как минимум один мальчик и рядом с одним мальчиком сидела хотя бы одна девочка.
вроде правильно

Pascal

var
q, w: integer;
e: boolean;
r: Text;
begin
Assign(r,'input.txt');
Reset(r);
Readln(q,w);
Close(r);
if q > w then e := (q / w <= 2)
else e := (w / q <= 2);
if e then writeln('YES')
else writeln('NO')
end.

@Puporev · 29.07.2014, 10:42

Определите, возможно ли детям сесть так, чтобы рядом с одной девочкой сидел как минимум один мальчик

@Puporev Почетный модератор 64303 / 47600 / 32742 Регистрация: 18.05.2008 Сообщений: 115,181
	29.07.2014, 10:42	2
	Определите, возможно ли детям сесть так, чтобы рядом с одной девочкой сидел как минимум один мальчик 0