$ 0 0 Код 1C v 8.хФункция ЧетноеЧисло(пЧисло) Четное = пЧисло%2=0; Возврат Четное; КонецФункции Код 1C v 8.хФункция ровноеЧисло(пЧисло) Четное = пЧисло%2=1; Возврат Четное; КонецФункции //или Фунция ДровноеЧисло (Чис) Возврат Чис = Цел(Чис); КонецФункции Код 1C v 7.xФункция ДробноеЧисло (Чис) Возврат ?(Чис = Цел(Чис),1,0); КонецФункции