Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Четность числа [D5, WinXP]


Dima-k17 ©   (2003-01-22 21:05:00) 

Очень дико извиняюсь, что не порылся в ФАК, но просто некогда, кто знает, как определить четность числа, скиньте плз. на мыло, завтра прогу сдавать, а опомнился только счас... Если можно то в Pascale"e...


Palladin   (2003-01-22 21:24:00) [1]

2 Armageddon
хе... Paskal могет усетаки Pascal?


Palladin   (2003-01-22 21:23:00) [2]

все гораздо проще
функция Odd(число)
если true то нечетное и четное если false


Armageddon   (2003-01-22 21:19:00) [3]

Везде одинаково.
a-переменная которую необходимо проверить на четность.
s-строка

if (a mod 2)=0 then
s:="четное"
else
s:="нечетное";


Учи Paskal!!!

В Факе такого нет, сильно просто.



Наверх

Титульная страница Поиск, карта сайта Написать письмо