Проверка на чётное число в 1С
Для 1C 8
1 2 3 4 |
Функция ПроверкаНаЧетноеЧисло(ПроверяемоеЧисло) ЧислоЧетное = ПроверяемоеЧисло%2=0; Возврат ЧислоЧетное; КонецФункции |
Проверка на дробное число в 1С
Для 1C 8
1 2 3 4 5 6 7 8 9 10 |
Функция ПроверкаНаДробноеЧисло(ПроверяемоеЧисло) ЧислоЧетное = ПроверяемоеЧисло%2=1; Возврат ЧислоЧетное; КонецФункции //или Фунция ПроверкаНаДробноеЧисло (ПроверяемоеЧисло) Возврат ПроверяемоеЧисло = Цел(ПроверяемоеЧисло); КонецФункции |
Для 1C 7
1 2 3 |
Функция ПроверкаНаДробноеЧисло (ПроверяемоеЧисло) Возврат ?(ПроверяемоеЧисло = Цел(ПроверяемоеЧисло),1,0); КонецФункции |