[Igor]

var a:real;
...a:=1;
a:=a/5; вроде должно работать.
И ещё косяк - если создать, например, константу pi=3.1415 то в результате pi может оказаться другим, потому мне приходилось создавать переменную pi, а потом присваивать это значение.