|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Sergey Smagin 2:5054/60 20 Sep 2001 23:54:19 To : Aleksandr Luzenin Subject : чет/нечет --------------------------------------------------------------------------------
19 Сен 01 15:25, Aleksandr Luzenin wrote to All:
AL> Если не трудно то скажите как цифру проверить на сабж!
AL> ... в документации времени нет копаться! а вам ничего не стоит
AL> написать пару строчек об этом! :)
Действительно пару, разве сложно было?
my $num = 8;
if ((int $num/2)*2 == $num) {
print 'Четное';
} else {
print 'Hечетное';
}
Sergey go to: http://www.domainpoint.by.ru
--- MP3: silence
* Origin: 1014 days Fidonet available (2:5054/60)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/18243baa3b94.html, оценка из 5, голосов 10
|