насколько я понял, здесь требуется проверять
остаток от деления по модулю. к сожалению
в куке нет функции модулюс, экспоненты,
степени(пауэр) и т.д. я когда-то сделал
что-то вроде этого:
;modulo operation
DEFFCT INT Mod(LValue : IN, RValue : IN)
DECL INT LValue
DECL INT RValue
DECL INT Result
DECL INT tmp
Result = 0 ;remained value after division
tmp = 0
IF RValue == 0 THEN
RETURN Result
ENDIF
tmp = LValue / RValue
Result = LValue - RValue * tmp
RETURN Result
ENDFCT
используется так:
IF Mod(i, 4) == 0 THEN
Halt
ENDIF
|