begin for a : = 1000 to 9999 do begin c1 : = a div 1000; c2 : = (a div 100) mod 10; c3 : = (a div 10) mod 10; c4 : = a mod 10; if (c1 < > c2) and (c1 < > c3) and (c1 < > c4) and (c2 < > c3) and (c2 < > c4) and (c3 < > c4) then writeln(a); end; end.
Ответ дал: Гость
паровозы кажется могут толкать состав назад, ехать как задом так и передом и тп. иначе я не знаю.
первый поезд делится на (паровоз+10) и 11 вагонов.
и эту десятку паровоз тянет в тупичек.
второй поезд проезжает тупичек.
паровоз первого вытягивает свою десятку на свободный путь
второй паровоз толкает свой состав так чтоб стать перед тупичком
второй паровоз отцепляется и прицепляется к оставшимся 11 вагонам.
второй паровоз задом запихивает 11 вагонов в тупичек
Популярные вопросы