Vinatorul

1) Забыли объявить переменную с (первая строчка)
2) В предпоследней строке делите на 6, а в примере на b
3) Y имеет тип Real, а вы используете IntToStr в последней строке