Проверка числа на четность

Нужно проверить чётное число или нет.

Мои мысли такие: каждый раз делить число на 2, а потом проверять целый остаток или нет...

[Chs]

Oleg (24-05-2001 20:30):
Нужно проверить чётное число или нет.

Мои мысли такие: каждый раз делить число на 2, а потом проверять целый остаток или нет...

#!/usr/bin/perl
$n=4;
print "Четное" if not ($n % 2);

Всем известно, что битовые операции выполняются быстрее, чем всякие-там-деления... поэтому нужно писать так:

print "Четное" unless $n & 1;

А вообще-то TIMTOWTDI %)