ну и, напишу я в константах EDINICA : INT := 1; разве слово не заменит целочисленную единицу в формулах?