Помогите написать программу

[Cyrus83]

Когда корабли седьмого американского флота пришвартовались к станции Петушки, партийных девиц там не было, но если комсомолок называть партийными, то каждая третья из них была блондинкой. По отбытии кораблей седьмого американского флота обнаружилось следующее: каждая третья комсомолка была изнасилована, каждая четвертая изнасилованная оказалась комсомолкой, каждая пятая изнасилованная комсомолка оказалась блондинкой, каждая девятая изнасилованная блондинка оказалась комсомолкой. Если всех девиц в Петушках 428 - определи, сколько среди них осталось нетронутых беспартийных брюнеток?

@темы: Pascal, Delphi

Comments

[Flex Ferrum]

Эммм... Прошу прощения, а это чей извращённый и больной ум такие задачки выдумывает?

[Бог на мякине]

Flex Ferrum, ох, это же школьная программа

[Flex Ferrum]

ох, это же школьная программа

Ага. Одна из типовых задач на круги Эйлера (7-ой класс школы)... При чём тут Delphi и Pascal - непонятно только.

[Flex Ferrum]

Rabid Coyote, это задача из книги Венедикта Ерофеева "Москва-Петушки". В гугле можно найти её решение.

[Cyrus83]

Flex Ferrum, спасибо. Это была попытка тролльского вброса, чтобы повеселить народ.