Каморка

n=0

в зависимости от компилятора будет работать.

ajkj2em писал(а):

nemiga писал(а):

Код: Выделить всё

if Even(N)=true then N:=N/2 else N:=3*N+1;

это вопрос на общее образование. это так называемые числа-градины
(hailstone numbers). http://mathworld.wolfram.com/CollatzProblem.html

IIRC среди начальных условий есть т.н. резонаторы, но формула для
них не известна. так что ответ на оригинальный вопрос -

XЗ

З_А_Ч_О_Т _!_!_!

Правильный ответ!

nemiga, никакой не зачет. В некоторых компиляторах 0 будет считатся четным.

spavel писал(а):nemiga, никакой не зачет. В некоторых компиляторах 0 будет считатся четным.

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

А правильмый ответ -- hailstone numbers или вариации на эту тему. Всё.

.